首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

怎么判断某网站是否在打开状态

2012-01-20 
如何判断某网站是否在打开状态!现在我的程序想要这样一个功能!连接到网站1判断语句:if网站1没开通,then连

如何判断某网站是否在打开状态!
现在我的程序想要这样一个功能!

连接到网站1      
判断语句:

if     网站1没开通,   then     连接到网站2   else   (网站在正常开通状态下)   连接到网站1

说明,我在家里开了一个服务器   ,白天不在家   服务器关闭,这个时候我希望程序可以判断家里的那个网站   在关闭状态   然后选择群空间的地址   并打开网业..目前还不知道如何判断网站是否开启状态..   请教了!

能不用控件的尽量不用控件..  

我有条思路不知道通不通..   open   语句生成一个bat   ping   我的网址(隐藏)如果不通马上停止ping   执行打开另一网站的代码....   可是如何ping   并获取到ping   的信息   就不知道了   ..

[解决办法]
shell "ping yourURL > YourUrlPingFile.txt ",vbhide
'Delay
open "YourUrlPingFile.txt " for input as #1
....
shell "ping yourURL2 > YourUrlPingFile2.txt ",vbhide
'Dely
....

[解决办法]
用winsock控件,80端口,连接你的网址,连不上说明关闭了;
或者在你的服务器上放一个特定内容的文件比如tag.txt,然后用inet读这个文件,读不到说明关闭了。
[解决办法]
shell "ping yourURL > YourUrlPingFile.txt ",vbhide '调用命令行的ping ,将输出存到YourUrlPingFile.txt里
'Delay '一段延时,让ping命令有足够时间完成
open "YourUrlPingFile.txt " for input as #1 '读ping的结果
.... '分析结果,下同
shell "ping yourURL2 > YourUrlPingFile2.txt ",vbhide
'Dely
....
[解决办法]
在VB中如何使用ping命令。

http://www.upschool.com.cn/edu/1298/2006/1220/10du232829_1.shtml

大家看看这篇文章,PING不是很简单吗?用SHELL直接调用CMD进行执行就行了.这篇文章上的代码我看怎么着有上万字吧.郁闷.

热点排行