亚洲乱码中文字幕综合,中国熟女仑乱hd,亚洲精品乱拍国产一区二区三区,一本大道卡一卡二卡三乱码全集资源,又粗又黄又硬又爽的免费视频

VBS監(jiān)視網(wǎng)絡(luò)連接與斷開的代碼

 更新時間:2013年07月29日 18:36:40   作者:  
監(jiān)視網(wǎng)絡(luò)連接與斷開,特殊情況下可能有點用,兩個VBS腳本均來自微軟官網(wǎng)

監(jiān)視網(wǎng)絡(luò)連接:

復(fù)制代碼 代碼如下:

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)視網(wǎng)絡(luò)斷開:

復(fù)制代碼 代碼如下:

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

相關(guān)文章

最新評論