excel 另存TXT后,遇到的问题
我用 oExcel.ActiveWorkbook.SAVEAS(objFolder.path+"\"+"&WJMT"+".txt",-4158) &&另存TXT是考虑到EXCEL表太大,如果直接追加到DBF会出现记录追加不完整的情况.
将EXCEL表另存为TXT后,以TAB隔开,但头痛的是另存为TXT后个别字段被加了双引号,如 "黑色;HIPS新料压制。SCART状态,带CI卡,不带DVD,不旋转。"
再用追加到DBF表中时: APPEND FROM "&WJMT"+".txt" DELIMITED WITH TAB
只要TXT文档中被加双引号的行项目,导入DBF都是错位的。目前没有好的解决方案,特请教高手。
另预祝朋友们节日快乐!
[解决办法]
你你上传的XLS文件,直接另成为DBF,格式正确,
如果有备注字段且长度过长的话,要用代码来导入
[解决办法]
Csv 格式,你试一下
oExcel.ActiveWorkbook.SAVEAS(objFolder.path+"\"+"&WJMT"+".Csv",6)
或
oExcel.ActiveWorkbook.SAVEAS(objFolder.path+"\"+"&WJMT"+".Csv",22)
或
oExcel.ActiveWorkbook.SAVEAS(objFolder.path+"\"+"&WJMT"+".Csv",23)
或
oExcel.ActiveWorkbook.SAVEAS(objFolder.path+"\"+"&WJMT"+".Csv",24)