xls文件内容存到txt文件内,如何跳过xls文件的列名或跳过第一行
xls文件内容存到txt文件内,如何跳过xls文件的列名或跳过第一行
回复 2楼 吹水佬
CREATE DBF hbwj (xm C(30),yxzjhm C(20))adir(wjm, "C:\Users\11235\Desktop\合并文件\*.xls")
OEXCEL = CREATEOBJECT("EXCEL.APPLICATION")
for i = 1 to alen(wjm,1)
OEXCEL.WORKBOOKS.OPEN("C:\Users\11235\Desktop\合并文件\"+wjm(i,1))
OEXCEL.DISPLAYALERTS = .F.
OEXCEL.ACTIVEWORKBOOK.SAVEAS("C:\Users\11235\Desktop\合并文件\sj.TXT", -4158)
OEXCEL.ACTIVEWORKBOOK.CLOSE
OEXCEL.DISPLAYALERTS = .T.
OEXCEL.QUIT
SELECT hbwj
APPEND FROM sj.TXT DELIMITED WITH TAB
endfor
麻烦给看一下怎么把当前打开文件的第一行跳过去