代码如下： 一直提示 （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编辑过]

先把EXCEL文件另存为 5.0/95版本，然后再导入VFP中

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

office2007以上的Excel版本应该是没有导出5.0/95格式了，高版本的Excel可以直接导出制表符文本文件，然后在VFP使用导入向导导入Txt文本，也好用

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

如果用代码的话，可以用filetostr()函数将文本读入内存，然后用文本函数处理放表里，Excel导出TXT的时候最好选择制表符分隔的文本，这样就不需要使用strconv()转码...否则会有乱码，另外如需转码，要先把文本标识符去掉再转

试了一下，程序本身没有问题，问题出在上面各位所说的版本格式上，可用下面的Test.xls测试一下就知道啦。

我的是office是2016啊，可以另存为5.0

哈哈，记错了，是可以转5.0，不能直转dbf了

[此贴子已经被作者于2020-3-2 11:54编辑过]