- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]哪里可以采集到中国行政划分资源 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=86263)
-- 发布时间：2016/6/14 12:23:00
-- [求助]哪里可以采集到中国行政划分资源
类似的淘宝地址输入我现在需要采集中国全部的省市县街道资源，不知道有人知道去哪里采集数据是最新的吗？
此主题相关图片如下：qq截图20160614122032.png
-- 发布时间：2016/6/14 12:38:00
--
参考
http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=74415&skin=0
-- 发布时间：2016/6/21 12:13:00
--
此主题相关图片如下：qq截图20160621121121.png
这里的金门县是没有链接的，如果用上述代码就会报错
请问判断是否有链接地址的代码该怎么写？
非常感激
-- 发布时间：2016/6/21 12:31:00
--
比如这句
tds2(1).GetElementsByTagName("a")(0).GetAttribute("href")
要改成
If tds2(1).GetElementsByTagName("a").Count > 0 Then
tds2(1).GetElementsByTagName("a")(0).GetAttribute("href")
Else
msgbox("没有链接")
End If
[此贴子已经被作者于2016/6/21 14:13:27编辑过]
-- 发布时间：2016/6/21 13:37:00
--
此主题相关图片如下：qq截图20160621133620.png
错误提示
-- 发布时间：2016/6/21 14:05:00
--
自己顶，我在网上没有找到对应的属性
-- 发布时间：2016/6/21 14:13:00
--
哦，写错了
If tds2(1).GetElementsByTagName("a").Count > 0 Then
tds2(1).GetElementsByTagName("a")(0).GetAttribute("href")
Else
msgbox("没有链接")
End If
-- 发布时间：2016/6/21 14:43:00
--
谢谢