VBS監(jiān)視網絡連接與斷開的代碼
來源:易賢網 閱讀:2018 次 日期:2014-05-09 16:28:50
溫馨提示:易賢網小編為您整理了“VBS監(jiān)視網絡連接與斷開的代碼”,方便廣大網友查閱!

監(jiān)視網絡連接與斷開,特殊情況下可能有點用,兩個VBS腳本均來自微軟官網

監(jiān)視網絡連接:

代碼如下:

strComputer = "."

Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\wmi")

Set colMonitoredEvents = objWMIService.ExecNotificationQuery _

("Select * from MSNdis_StatusMediaConnect")

Do While True

Set strLatestEvent = colMonitoredEvents.NextEvent

Wscript.Echo "A network connection has been made:"

WScript.Echo strLatestEvent.InstanceName, Now

Wscript.Echo

Loop

監(jiān)視網絡斷開:

代碼如下:

strComputer = "."

Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\wmi")

Set colMonitoredEvents = objWMIService.ExecNotificationQuery("Select * from MSNdis_StatusMediaDisconnect")

Do While True

Set strLatestEvent = colMonitoredEvents.NextEvent

Wscript.Echo "A network connection has been lost:"

WScript.Echo strLatestEvent.InstanceName, Now

Loop

更多信息請查看IT技術專欄

更多信息請查看腳本欄目
關于我們 | 聯(lián)系我們 | 人才招聘 | 網站聲明 | 網站幫助 | 非正式的簡要咨詢 | 簡要咨詢須知 | 新媒體/短視頻平臺 | 手機站點

版權所有:易賢網