对于vbs中ping的实现可以通过两种方式 :
1、调用系统ping命令;
2、使用wmi查询pingstate类处理。
1、调用系统ping命令
12 | Setwshell = CreateObject("WScript.Shell")wshell.run("ping 182.183.101.1",0.true) |
对于以上调用,如果想对其进行过滤,可以考虑将运行结果重定向到文件,在读到一个string中,查找其中是否有timeout或超时字符,判断是否超时。本打算直接拼接命令重定向到文件,但怎么都不成功,所以run调用一个bat,bat中写:ping 192.168.101.1 -n 1 -w 1200
2、使用wmi查询pingstate类处理:
123456789101112 | 'url = "www.baidu.com"url = "119.75.217.109"strComputer = "."SetobjWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\"& strComputer & "\root\cimv2")SetcolPings = objWMIService.ExecQuery ("Select * From Win32_PingStatus where Address = '"& url & "'")ForEachobjPing in colPingsMsgBox url & " responded to ping."& vbcrlf &_"Responding Address: "& objPing.ProtocolAddress & vbcrlf &_"Responding Name: "& objPing.ProtocolAddressResolved & vbcrlf &_"Bytes Sent: "& objPing.BufferSize & vbcrlf &_"Time: "& objPing.ResponseTime & " ms" |
appcenter.* 192.168.1.7log.* 192.168.1.7别的,陈述中也说到,选用WordPress的站点均匀会装置12个插件。 Speed: 576.6 x/s估计2019年下...
尽管说三星和苹果的专利权战正打的不相往来,可是这并沒有对三星的赢利造成很大危害。当别的智能机生产商,例如HTC、RIM、Nokia都是在智能机销售市场上千辛万苦挣脱,三星却一直顺顺当当,...
眼底下最受注目的 当然是中国与美国中间的诸多事情 Tik Tok事情曲折持续 对外经济贸易商谈备受关注 重磅新闻持续,出口外贸人一定要立即关心 事情1 TikT...
本文导读目录: 1、求最新的完本黑客类小说 2、谁介绍几本有关黑客的小说! 3、求一本主角是黑客的小说 想不起来叫什么了 4、推荐好看的黑客类小说 5、黑客类的小说介绍几本,谢了。...
. 不少细心的父母会发现孩子睡觉的时候会磨牙,那么导致孩子磨牙的原因有哪些呢,听说孩子晚上磨牙是肚子里有蛔虫是真的吗?孩子晚上喜欢磨牙怎么办? 孩子磨牙是有蛔虫吗 宝宝磨牙可能是有蛔虫,因为当宝...
怎样同步老婆微信不被知道(实时同步老婆的微信聊天记录)微信的出现让我们的生活更精彩,但也同样带来了很多烦恼,比如很多网友就问找黑客破解老婆微信具体该怎么操作【黑/客/徽/信/4429084】?找黑客当...