WMI中的Win32_PingStatus類(ping命令實(shí)現(xiàn))
更新時(shí)間：2011年01月28日 23:51:27 作者：
平時(shí)很少用到ping命令，所以這個(gè)類也沒(méi)怎么用過(guò)，測(cè)試了一下，好像效率比ping要高。計(jì)算ping 100次jb51.net延遲的平均值。
復(fù)制代碼 代碼如下:
IP = "jb51.net"
WQL = "Select * from Win32_PingStatus Where Address = '$IP'"
WQL = Replace(WQL,"$IP",IP)
n = 0 : s = 0
Do Until n = 100
Set objWMIService = GetObject("winmgmts:\\.\root\cimv2")
Set colItems = objWMIService.ExecQuery(WQL,,48)
For Each objItem in colItems
If objItem.StatusCode = 0 Then
s = s + objItem.ResponseTime
n = n + 1
End If
Next
Loop
WScript.Echo "Average:" & s / n
參考鏈接：Win32_PingStatus Class
原文：http://demon.tw/programming/wmi-win32_pingstatus.html
您可能感興趣的文章:
- python使用win32com在百度空間插入html元素示例
- win32使用openfilename瀏覽文件窗口示例
- python字符串加密解密的三種方法分享(base64 win32com)
- 如何使一個(gè)HTA位于屏幕中心(Win32_DesktopMonitor)
- c#用Treeview實(shí)現(xiàn)FolderBrowerDialog 和動(dòng)態(tài)獲取系統(tǒng)圖標(biāo)（運(yùn)用了Win32 dll類庫(kù)）
- nginx win32 版本靜態(tài)文件測(cè)試 (Windows環(huán)境)
- win32安裝配置非安裝版的MySQL
- iis Win32狀態(tài)數(shù)值（sc-win32-status）說(shuō)明
- PSW.Win32.Magania.ffw(F3C74E3FA248.exe)病毒的清除
- Worm.Win32.AutoRun.bqn病毒分析解決
- inst.exe,Setup.exe木馬Trojan-PSW.Win32.Magania.cjy解決方法
- Downloader Win32.Delf.dqu(IRAT.rmvb,mm.exe)分析查殺
- 木馬程序Trojan-Spy.Win32.Agent.cfu清除方法
- MSN圣誕照片(Backdoor.Win32.PBot.a)病毒分析解決
- 木馬下載器Win32.TrojDownloader.Delf.114688
- recycle.exe(Trojan-Dropper.Win32.VB.rj)病毒的查殺方法
- Backdoor.Win32.IRCBot.afm(video.exe)病毒的處理方法
- win32 api實(shí)現(xiàn)簡(jiǎn)單的消息窗口示例
相關(guān)文章
VBS教程：VBScript 語(yǔ)句-With 語(yǔ)句
VBS教程：VBScript 語(yǔ)句-With 語(yǔ)句...2006-11-11
使用 Iisext.vbs 啟用Web服務(wù)擴(kuò)展文件的方法
這篇文章主要介紹了如何使用 iisext.vbs 在本地或遠(yuǎn)程計(jì)算機(jī)上啟用 Web 服務(wù)擴(kuò)展文件,需要的朋友可以參考下2014-07-07
可以得到當(dāng)前系統(tǒng)信息的腳本sysinfo.vbs
可以得到當(dāng)前系統(tǒng)信息的腳本sysinfo.vbs...2007-02-02
用VBScript批量安裝網(wǎng)絡(luò)打印機(jī)和設(shè)置默認(rèn)打印機(jī)
假如你有幾十臺(tái)機(jī)器，幾臺(tái)打印機(jī)，共享網(wǎng)絡(luò)上有網(wǎng)絡(luò)打印機(jī)的安裝驅(qū)動(dòng)，可是每臺(tái)電腦都點(diǎn)擊幾次驅(qū)動(dòng)十分麻煩，本人做了個(gè)VBS，這樣就方便多了，拿來(lái)和大家分享，不足之處請(qǐng)見(jiàn)諒！2009-03-03
教你用vbs實(shí)現(xiàn)微信自動(dòng)發(fā)送消息功能
無(wú)意中接觸了vbs這個(gè)腳本感覺(jué)挺好玩的,這篇文章主要給大家介紹了關(guān)于如何用vbs實(shí)現(xiàn)微信自動(dòng)發(fā)送消息功能的相關(guān)資料,文中通過(guò)實(shí)例代碼介紹的非常詳細(xì),需要的朋友可以參考下2022-04-04
vbs整人代碼大集合，收集的比較全，喜歡的朋友可以參考下。不要搞破壞，學(xué)習(xí)vbs的朋友非常有幫助，死循環(huán)的使用比較多。2011-02-02
VBS教程：方法-MoveFile 方法...2006-11-11
用vbs實(shí)現(xiàn)路由器的重啟，時(shí)間上就是利用vbs模擬按鍵輸出。2009-03-03
VBS教程：屬性-Item 屬性...2006-11-11
VBS教程：對(duì)象-正則表達(dá)式(RegExp)對(duì)象
RegExp對(duì)象在VBScript中提供正則表達(dá)式支持功能，該對(duì)象有3個(gè)屬性和3個(gè)方法2006-11-11