对于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" |
本文一切实战盲注比如,均来自Joomla! 3.7.0 – ‘com_fields’ SQL Injection。 因为篇幅有限,本文就不去分析缝隙原理,直接奉告payload刺进点,来展示盲注的用法...
近日,小编收到了网友的举报,他表示自己在某网站发布信息,希望有黑客可以帮他找回自己因为网络赌博而输掉的钱财,然而万万没想到的是,不但网络赌博输掉的钱没有被找回,他还被这个所谓的“黑客”又“坑”了一回。...
Temirkhan Myrzamadi gymmasssorla@gmail.com>退出kiosk形式装置VS Community 2019并更新版别,挑选“Desktop developme...
关键字:淘宝打假 可用领域:可用全部领域 可用商家经营规模:淘宝网店、天猫店铺 伴随着大家法治意识的持续提高及其互连网的飞速发展,由互联网技术造成的一些纠纷案...
刚已往的一周,我的伴侣圈有常常刷到一款综艺的宣发。它竟然不是《奇葩说》,而是一部叫做《奇遇人生》的国产新综艺。 《奇遇人生》今朝播了四期,就有人断言“大概是2018最好的综艺”,也有人在弹幕里说“这是...
新华社莫斯科11月13日电(记者张骁)俄罗斯总统普京13日表示,纳戈尔诺-卡拉巴赫(纳卡)地区战斗行动造成包括平民在内的4000余人死亡、8000余人受伤,另有数万人沦为难民。 据克里姆林宫...