中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net  论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

游客:  注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » 求教!如何判断URL链接是否存在?
作者:
标题: 求教!如何判断URL链接是否存在? 上一主题 | 下一主题
ajon911
初级用户





积分 49
发帖 24
注册 2007-12-3
状态 离线
『楼 主』:  求教!如何判断URL链接是否存在?

请大虾们帮忙!
比如要判断 http://www.baidu.com/10000.txt 链接是否存在,存在则继续执行下面命令,(主要是如何判断URL链接)
自己无法解决,特此发帖求助,还望大虾们能解答此疑惑...

批处理或vbs都可以(不依靠外部工具执行)

[ Last edited by ajon911 on 2008-11-3 at 17:24 ]

2008-11-3 14:07
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
HAT
版主





积分 9023
发帖 5017
注册 2007-5-31
状态 离线
『第 2 楼』:  

用VBS访问这个URL,然后判断返回值是不是200



2008-11-3 16:05
查看资料  发短消息 网志   编辑帖子  回复  引用回复
ajon911
初级用户





积分 49
发帖 24
注册 2007-12-3
状态 离线
『第 3 楼』:  



  Quote:
Originally posted by HAT at 2008-11-3 04:05 PM:
用VBS访问这个URL,然后判断返回值是不是200

能否具体说明一下??

2008-11-3 16:20
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
yishanju
银牌会员

[b]看你妹啊[/b]


积分 1488
发帖 1357
注册 2006-5-20
状态 离线
『第 4 楼』:  

其实用外部工具,WGET curl 也可以实现




有问题请发论坛或者自行搜索,再短消息问我的统统是SB
2008-11-3 17:00
查看资料  发短消息 网志   编辑帖子  回复  引用回复
yishanju
银牌会员

[b]看你妹啊[/b]


积分 1488
发帖 1357
注册 2006-5-20
状态 离线
『第 5 楼』:  

像百度这个连接也会返回200吧,但是显像这个文件是不存在的。

判断返回值也许不一定准,用wget 或curl 下载要访问的文本,然后分析文件里的内容。。。




有问题请发论坛或者自行搜索,再短消息问我的统统是SB
2008-11-3 17:04
查看资料  发短消息 网志   编辑帖子  回复  引用回复
ajon911
初级用户





积分 49
发帖 24
注册 2007-12-3
状态 离线
『第 6 楼』:  

期待满意的解决方案...
(不依靠外部工具执行)

2008-11-3 17:21
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
s11ss
银牌会员





积分 2098
发帖 566
注册 2007-9-11
状态 离线
『第 7 楼』:  

baidu的页面不存在也会返回200,可以把得到的网页内容和http://www.baidu.com/search/error.html的比较,相同的话就是页面不存在,vbs可以实现

2008-11-3 19:48
查看资料  发短消息 网志   编辑帖子  回复  引用回复
ajon911
初级用户





积分 49
发帖 24
注册 2007-12-3
状态 离线
『第 8 楼』:  



  Quote:
Originally posted by s11ss at 2008-11-3 07:48 PM:
baidu的页面不存在也会返回200,可以把得到的网页内容和http://www.baidu.com/search/error.html的比较,相同的话就是页面不存在,vbs可以实现

即是如此有请 s11ss 兄该帮改良改良,(下面的返回时间太长)
On Error Resume Next
Set oDOM=WScript.GetObject("http://www.baidu.com/10000.txt")
if err.Number<>0 then
    WScript.echo "不存在"
    WScript.quit
end if
Do Until oDOM.readyState="complete"
WScript.sleep 200
Loop
s = oDOM.documentElement.outerText
Set oDOM=nothing
if InStr(s, "不存在")>0 or InStr(s, "未找到") then WScript.echo "不存在"

2008-11-3 20:35
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
s11ss
银牌会员





积分 2098
发帖 566
注册 2007-9-11
状态 离线
『第 9 楼』:  

我这儿很快啊,一下就返回了

2008-11-3 21:50
查看资料  发短消息 网志   编辑帖子  回复  引用回复
dtdfctdoslm
新手上路





积分 8
发帖 7
注册 2008-11-1
状态 离线
『第 10 楼』:  肯定慢,如果网络慢

肯定慢,如果网络慢

2008-11-3 22:34
查看资料  发短消息 网志   编辑帖子  回复  引用回复
qinzdc
新手上路





积分 1
发帖 1
注册 2008-11-3
状态 离线
『第 11 楼』:  

晕了,积分是怎么才有的呢~~~我的杂就是o

2008-11-3 23:50
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
HAT
版主





积分 9023
发帖 5017
注册 2007-5-31
状态 离线
『第 12 楼』:  Re 11楼

Q: 怎样获得积分?
A: 发新话题奖励: 积分 1 点 - 发表回复奖励: 积分 1 点



2008-11-4 00:41
查看资料  发短消息 网志   编辑帖子  回复  引用回复

请注意:您目前尚未注册或登录,请您注册登录以使用论坛的各项功能,例如发表和回复帖子等。


可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题



论坛跳转: