Foxtable(狐表)用户栏目专家坐堂 → [求助]导入链接网页


  共有1976人关注过本帖树形打印复制链接

主题:[求助]导入链接网页

帅哥哟,离线,有人找我吗?
chnfo
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2205 积分:18150 威望:0 精华:0 注册:2011/11/26 20:21:00
[求助]导入链接网页  发帖心情 Post By:2016/4/6 22:38:00 [只看该作者]

一个文本文件,有些网址用回车符分开,想导入进表,但直接导总是空白,双击又可显示。如何才能正常导入呢。帮助里有一节:排除不支持的数据类型。真的没办法了吗?
[此贴子已经被作者于2016/4/6 22:38:12编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/4/6 22:38:00 [只看该作者]

 文本、导入代码,发上来。
[此贴子已经被作者于2016/4/6 22:38:43编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
chnfo
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2205 积分:18150 威望:0 精华:0 注册:2011/11/26 20:21:00
  发帖心情 Post By: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编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/4/6 23:32:00 [只看该作者]

for each cs as string in s.replace(chr(10), "").split(chr(13))

 回到顶部