标题:xls文件内容存到txt文件内,如何跳过xls文件的列名或跳过第一行
取消只看楼主
yuq
Rank: 1
等 级:新手上路
帖 子:34
专家分:0
注 册:2022-3-7
结帖率:72.73%
已结贴  问题点数:20 回复次数:4 
xls文件内容存到txt文件内,如何跳过xls文件的列名或跳过第一行
xls文件内容存到txt文件内,如何跳过xls文件的列名或跳过第一行
搜索更多相关主题的帖子: xls 列名 文件 跳过 一行 
2022-09-06 22:10
yuq
Rank: 1
等 级:新手上路
帖 子:34
专家分:0
注 册:2022-3-7
得分:0 
回复 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


麻烦给看一下怎么把当前打开文件的第一行跳过去
2022-09-07 09:28
yuq
Rank: 1
等 级:新手上路
帖 子:34
专家分:0
注 册:2022-3-7
得分:0 
回复 4楼 吹水佬
合并文件.zip (12.24 KB)
2022-09-07 10:10
yuq
Rank: 1
等 级:新手上路
帖 子:34
专家分:0
注 册:2022-3-7
得分:0 
回复 6楼 吹水佬
这样虽然将列头去掉了,但是并不是严格意义上的跳过第一行呀
2022-09-07 13:01
yuq
Rank: 1
等 级:新手上路
帖 子:34
专家分:0
注 册:2022-3-7
得分:0 
非常感谢各位大牛答疑解惑!问题已解决
2022-09-09 23:09



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-509965-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.833095 second(s), 9 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved