代码如下： 一直提示 （excel文件是对的，也是6例 附excle文件）
CREATE CURSOR ct_temppos(;
       f1 c (50),;
       f2 c (50),;
       f3 c (50),;
       f4 c (50),;
       f5 c (50),;
       f6 c (50))

lcfile=getfile('xls','文件名称:','选定')
if !empty(lcfile)
   select ct_temppos
   append from &lcfile. TYPE  XL5
   GO top
   DELETE
endif      

[此贴子已经被作者于2020-3-1 15:23编辑过]

谢谢回复，我另存为也还是一样，怪了

谢谢，确实，变通一下也是一个好办法！

谢谢坛主的方法：完美解决
cDSN = "Driver={Microsoft Excel Driver (*.xls)};";
    + "DBQ=" + cFile + ";"
hDSN = SQLSTRINGCONNECT(cDSN)