如何通过表格批量生成TXT文件并按每条记录导出一个TXT
遍历处理即可,
http://www.foxtable.com/webhelp/topics/1438.htm,
http://www.foxtable.com/webhelp/topics/0345.htm
比如
For Each r As Row In Tables("订单").Rows
FileSys.WriteAllText("C:\data\" & r("编号") & ".Txt", r("第一列") & "," & r("第二列") & ..........., True)
Next
FileSys.WriteAllText("C:\data\" & r("编号") & ".Txt", r("第一列") & "," & r("第二列") &r("第三列") & "," & r("第四列") & ..........., True)r("第一列")={
r("第二列")="h": "2023/10/26",
r("第三列")="me": "1.TXT"
r("第四列")=}
插入的内容在TXT内显示为{"h": "2023/10/26","me": "1.TXT"}
如何修改为以下格式,(如何换行){
"h": "2023/10/26",
"me": "1.TXT"
}
vbcrlf:
http://www.foxtable.com/webhelp/topics/0347.htm
FileSys.WriteAllText("C:\data\" & r("编号") & ".Txt", r("第一列") & vbcrlf & r("第二列") & "," & vbcrlf & r("第三列")............