| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]批量生成TXT文件 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=188876) |
| -- 作者：bzqlyj -- 发布时间：2023/10/27 11:06:00 -- [求助]批量生成TXT文件 如何通过表格批量生成TXT文件并按每条记录导出一个TXT |
| -- 作者：有点蓝 -- 发布时间：2023/10/27 11:21:00 -- 遍历处理即可，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
|
| -- 作者：bzqlyj -- 发布时间：2023/10/30 17:37:00 -- 回复：（有点蓝）遍历处理即可，http://www.foxtable.... 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" } |
| -- 作者：有点蓝 -- 发布时间：2023/10/30 19:57:00 -- vbcrlf：http://www.foxtable.com/webhelp/topics/0347.htm FileSys.WriteAllText("C:\\data\\" & r("编号") & ".Txt", r("第一列") & vbcrlf & r("第二列") & "," & vbcrlf & r("第三列")............
|
| -- 作者：有点蓝 -- 发布时间：2023/10/30 19:57:00 -- 如果要合成json数据，建议使用这种方法：http://www.foxtable.com/mobilehelp/topics/0167.htm |