按照固定格式导入EXCEL，但是遇到这个EXCEL，发现身份证和编号字段某些记录无法识别
第一条记录为正常的数据，第二条身份证我按原来样子重打一遍，可以识别，但编号不认
第三条即原来数据，身份证和编号无法识别！
身份证和编号都已按正常导入的字段格式刷过。

源代码为：
   
opendbf=getfile('xlsx;xls')
IF EMPTY(opendbf)
else
lcFileName=opendbf
oExcel=Createobject('Excel.application')
oExcel.Workbooks.Open('&lcFileName') &&打开文件
oExcel.ActiveSheet.UsedRange.Select &&选中已用区域的数据
oExcel.Selection.NumberFormatLocal = "@" &&把被选定的单元格设为文本格式
oExcel.Columns.AutoFit  &&让所有的列宽都自动调整
oExcel.DisplayAlerts=.F.

oExcel.ActiveWorkbook.SaveAs('e:\1.xls',39) && 43为97/2003 xlExcel9795（39为5.0/95 xlExcel5 & xlExcel7)
oExcel.Workbooks.Close &&关闭表
oExcel.Quit &&退出EXCEL
Release oExcel &&释放变量

IMPORT from e:\1  xl5

USE 1 ALIAS ok
SET DELETED OFF

            

                  SELECT ok
                  GO 1
                  delete
                  COPY TO ghghgh FOR .not.deleted() AND !EMPTY(b)
                  SELECT RECNO(),b as sfzh,c as name,d as xb,f as dwname,;
                  i as type,j as zzbh FROM ghghgh  INTO dbf temok
                  replace exp_1 WITH RECNO()

不需要高版本转低版本，直接读取到DBF表中即可解决问题的

请问如何“直接读取到DBF表？”
上述XLS转DBF的代码是摘录得来
以前都用的很好，就遇到现在这个问题啦

如果表结构是固定的话，将XLS另存为文本文件，再APPEND到DBF就就可以。