永发信息网

VB 如何判断一个网页或网站 能否打开?

答案:4  悬赏:60  手机版
解决时间 2021-03-20 20:16
  • 提问者网友:沦陷
  • 2021-03-20 04:49
我想知道,怎么用VB来判断打开一个网页或者网站,在一定时间内能否打开?
请高手详细说明步骤,谢谢~
最佳答案
  • 五星知识达人网友:老鼠爱大米
  • 2021-03-20 06:17
VB内部的快捷键就自己设置一下,比如在command 的caption里面写"按钮B"
如果要用系统的的快捷键的话你就要用到api了,上网搜一下很多的
弹出窗口可以用inputbox也可以自己做一个窗口,inputbox不支持输中文
输入命令后运行你的命令就要看你想执行什么了,你可以让你的命令生成bat批处理,然后再用shell app.path "\my.bat"的方式调用运行
全部回答
  • 1楼网友:低音帝王
  • 2021-03-20 08:35
ping 他的服务器
  • 2楼网友:爱难随人意
  • 2021-03-20 08:19

private sub form_load() webbrowser1.navigate http://reg4.163.com/checkuser.jsp

obj.all.submit.click end sub

'突出显示那个根据网页不同而不同,要添加webbrowser控件的哈

'在工具箱中点击鼠标右键→选中“ 部件” → 复选microsoft internetcontrols → 然后点击“ 确定” 键即可

  • 3楼网友:傲气稳了全场
  • 2021-03-20 07:35
在部件里选择Microsoft Internet Transfer Control 6.0添加Inet控件 Private Sub Command1_Click() Inet1.OpenURL "" '用inet连接网页 aa = InStr(Inet1.GetHeader, "404") '判断页头是否包含字符“404”,返回0则不包含,否则返回其位置 If aa <> 0 Then '页头中包含404 MsgBox "网页不存在!" '则说明该网页不存在 Else '如果页头中不包含“404” MsgBox "网页存在!" '说明网页存在 End If End Sub 请参考
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯