網(wǎng)絡(luò)連接狀態(tài)建立于斷開的VBS腳本
斷開連接提示
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
上一篇:msxml3.dll 錯(cuò)誤 80070005 拒絕訪問
欄 目:vb
下一篇:運(yùn)行同一目錄下的可執(zhí)行程序的VBS代碼
本文標(biāo)題:網(wǎng)絡(luò)連接狀態(tài)建立于斷開的VBS腳本
本文地址:http://www.jygsgssxh.com/a1/vb/7442.html
您可能感興趣的文章
- 01-10VBS教程:運(yùn)算符-連接運(yùn)算符 (&)
- 01-10VBS腳本病毒原理分析與防范
- 01-10用vbs實(shí)現(xiàn)本地連接禁用/啟用腳本代碼
- 01-10本地連接禁用/啟用批處理腳本
- 01-10用vbs確定可移動驅(qū)動器的連接時(shí)間
- 01-10在vbs運(yùn)行命令行工具后讓命令窗口保持打開狀態(tài)的腳本
- 01-10用vbs實(shí)現(xiàn)枚舉網(wǎng)絡(luò)連接的代碼
- 01-10用VBS檢測Guest狀態(tài)的腳本
- 01-10用VBScript批量安裝網(wǎng)絡(luò)打印機(jī)和設(shè)置默認(rèn)打印機(jī)
- 01-10當(dāng)某IP 連接我機(jī)器的3389端口 報(bào)警的腳本


閱讀排行
本欄相關(guān)
- 01-10下載文件到本地運(yùn)行的vbs
- 01-10飄葉千夫指源代碼,又稱qq刷屏器
- 01-10SendKeys參考文檔
- 01-10什么是一個(gè)高效的軟件
- 01-10VBS中的正則表達(dá)式的用法大全 &l
- 01-10exe2swf 工具(Adodb.Stream版)
- 01-10VBS中SendKeys的基本應(yīng)用
- 01-10用VBSCRIPT控制ONSUBMIT事件
- 01-10VBScript教程 第十一課深入VBScript
- 01-10VBScript語法速查及實(shí)例說明
隨機(jī)閱讀
- 08-05dedecms(織夢)副欄目數(shù)量限制代碼修改
- 01-10SublimeText編譯C開發(fā)環(huán)境設(shè)置
- 01-10C#中split用法實(shí)例總結(jié)
- 01-10delphi制作wav文件的方法
- 08-05DEDE織夢data目錄下的sessions文件夾有什
- 01-10使用C語言求解撲克牌的順子及n個(gè)骰子
- 08-05織夢dedecms什么時(shí)候用欄目交叉功能?
- 01-11Mac OSX 打開原生自帶讀寫NTFS功能(圖文
- 01-11ajax實(shí)現(xiàn)頁面的局部加載
- 04-02jquery與jsp,用jquery


