| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]导入链接网页 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=83350) |
| -- 作者：chnfo -- 发布时间：2016/4/6 22:38:00 -- [求助]导入链接网页 一个文本文件，有些网址用回车符分开，想导入进表，但直接导总是空白，双击又可显示。如何才能正常导入呢。帮助里有一节：排除不支持的数据类型。真的没办法了吗？ [此贴子已经被作者于2016/4/6 22:38:12编辑过]
|
| -- 作者：大红袍 -- 发布时间：2016/4/6 22:38:00 -- 文本、导入代码，发上来。 [此贴子已经被作者于2016/4/6 22:38:43编辑过]
|
| -- 作者：chnfo -- 发布时间：2016/4/6 23:18:00 -- 文本可以直接复制几个网页地址，用狐表论坛的地址都行，用回车符隔开，存为links.txt。 直接在命令窗口执行 dim s as string = filesys.readalltext("link文件的路经") for each cs as string in s.split(vbcrlf) dim dr as datarow = datatables("a").addnew dr("第一列") = cs next 导进去，除第一行外，其它行都是空白，双击单元格又可以看到 dim mm as string = tables("a").rows(3)("第一列") output.show(mm.startswith("h")) \'它的运行结果居然是false
[此贴子已经被作者于2016/4/6 23:29:38编辑过]
|
| -- 作者：大红袍 -- 发布时间：2016/4/6 23:32:00 -- for each cs as string in s.replace(chr(10), "").split(chr(13)) |