網(wǎng)絡(luò)連接狀態(tài)建立于斷開的VBS腳本
更新時(shí)間：2011年02月22日 20:41:08 作者：
斷開連接提示與建立連接提示實(shí)現(xià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
Wscript.Echo
Loop
建立連接提示
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
復(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
Wscript.Echo
Loop
建立連接提示
復(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
相關(guān)文章
rem 請多多指導(dǎo)，如：增加功能；減少內(nèi)存；加快速度；加密變形；語法格式；書寫錯(cuò)誤；精簡語法2008-05-05
VBS調(diào)用Photoshop批量生成縮略圖的代碼
這篇文章主要為大家分享了通過vbs調(diào)用Photoshop批量生成縮略圖，需要的朋友可以參考下2013-12-12
VBS教程：正則表達(dá)式簡介 -字符匹配...2006-11-11
在windows 64位操作系統(tǒng)上運(yùn)行32位的vbscript的方法
這篇文章主要介紹了在windows 64位操作系統(tǒng)上運(yùn)行32位的vbscript的方法,需要的朋友可以參考下2016-11-11
vbs實(shí)現(xiàn)右鍵菜單中添加CMD HERE
cmdhere安裝，使你在任何目錄下直接進(jìn)入改目錄的CMD狀態(tài),需要的朋友可以參考下2008-05-05
使用 Iisftp.vbs 啟動(dòng)FTP站點(diǎn)的方法
這篇文章主要介紹了使用 Iisftp.vbs 啟動(dòng)FTP站點(diǎn)的方法,需要的朋友可以參考下2014-07-07
vbs實(shí)現(xiàn)的定時(shí)提醒你休息的腳本
天天坐在電腦前的朋友要每隔一段時(shí)間活動(dòng)一下，不然身體會(huì)變得越來越差。下成的vbs腳本可以每隔一段時(shí)間來提醒你。2008-06-06
自動(dòng)寫入文件上傳到指定服務(wù)器SoftwareMeteringCLS.vbs源碼
本次文章其中所用腳本代碼為ghiconan版主提供的由Branimir petrovic編寫的代碼，我在后面根據(jù)我公司現(xiàn)有的網(wǎng)絡(luò)情況做了一些文件管理的添加與刪除，最后有用ＦＴＰ批處理的方法上傳到服務(wù)器內(nèi)！2008-12-12
Ｎ年前，那時(shí)估計(jì)知道%5c暴庫的人還很少。這個(gè)vbs腳本應(yīng)當(dāng)是Lilo寫的,應(yīng)當(dāng)深深表達(dá)一下敬意……2008-02-02
這篇文章主要介紹了VBS文本文件操作實(shí)現(xiàn)代碼,需要的朋友可以參考下2014-04-04