婷婷综合国产,91蜜桃婷婷狠狠久久综合9色 ,九九九九九精品,国产综合av

主頁 > 知識庫 > vbs ping實現的兩種方式

vbs ping實現的兩種方式
熱門標簽：哪里有便宜的地圖標注公司 如何用機器人進行電銷 地圖標注政府哪個部門管 神行者美術館地圖標注 百度地圖標注點距離代碼 佛山真人電銷機器人廠家 除了地圖標注還有這種生意嗎 東營快遞外呼系統 齊齊哈爾高德地圖標注店

對于vbs中ping的實現可以通過兩種方式 ：

  • 1、調用系統ping命令；
  • 2、使用wmi查詢pingstate類處理。

1、調用系統ping命令

Set wshell = 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類處理：

'url = "www.baidu.com"
url = "119.75.217.109"
strComputer = "."
Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\"  strComputer  "\root\cimv2")
Set colPings = objWMIService.ExecQuery ("Select * From Win32_PingStatus where Address = '"  url  "'")
For Each objPing in colPings
MsgBox url  " responded to ping."  vbcrlf _
"Responding Address: "  objPing.ProtocolAddress  vbcrlf _
"Responding Name: "  objPing.ProtocolAddressResolved  vbcrlf _
"Bytes Sent: "  objPing.BufferSize  vbcrlf _
"Time: "  objPing.ResponseTime  " ms"
Next

到此這篇關于vbs ping的實現示例的文章就介紹到這了,更多相關vbs ping內容請搜索腳本之家以前的文章或繼續瀏覽下面的相關文章希望大家以后多多支持腳本之家！

您可能感興趣的文章:
  • VBS遍歷Excel工作表的實現代碼
  • VBS打開當前腳本所在文件夾
  • VBS怎么獲取指定目錄下的文件列表
  • 用vbs實現文本循環讀取
  • VBS日期(時間)格式化函數代碼
  • VBS遞歸創建多級目錄文件夾的方法
  • Vbs備份指定文件到指定目錄并且以日期重命名的實現代碼

標簽：湖州 鶴壁 四平 文山 銅川 邢臺 西安 巨人網絡通訊聲明：本文標題《vbs ping實現的兩種方式》，本文關鍵詞  vbs,ping,實現,的,兩種,方式,；如發現本文內容存在版權問題，煩請提供相關信息告之我們，我們將及時溝通與處理。本站內容系統采集于網絡，涉及言論、版權與本站無關。

  • 相關文章
  • 下面列出與本文章《vbs ping實現的兩種方式》相關的同類信息！
  • 本頁收集關于vbs ping實現的兩種方式的相關信息資訊供網民參考！
    • 推薦文章
    主站蜘蛛池模板： 砚山县| 清涧县| 玉门市| 思南县| 洞口县| 郴州市| 汉寿县| 衡水市| 夏河县| 沅陵县| 同心县| 永春县| 吴川市| 纳雍县| 芮城县| 政和县| 仙游县| 崇信县| 永和县| 甘孜县| 镇平县| 修武县| 铅山县| 新安县| 临海市| 保亭| 蓬莱市| 会泽县| 崇仁县| 昌吉市| 文安县| 石渠县| 静乐县| 海林市| 东乌珠穆沁旗| 株洲市| 灵山县| 余庆县| 永登县| 海南省| 崇义县|