手机
当前位置:查字典教程网 >脚本专栏 >vbs >VBS监视网络连接与断开的代码
VBS监视网络连接与断开的代码
摘要:监视网络连接:复制代码代码如下:strComputer="."SetobjWMIService=GetObject("winmgmts:"&...

监视网络连接:

复制代码 代码如下:

strComputer = "."

Set objWMIService = GetObject("winmgmts:" & strComputer & "rootwmi")

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

监视网络断开:

复制代码 代码如下:

strComputer = "."

Set objWMIService = GetObject("winmgmts:" & strComputer & "rootwmi")

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

【VBS监视网络连接与断开的代码】相关文章:

用vbs实现不死帐号的代码

网络连接状态建立于断开的VBS脚本

用VBS实现监视进程创建与删除的代码

VBS 提取狗狗影视中的ED2K连接的实现代码

用vbs实现更改计算机的说明的代码

VBS中常用脚本代码

VBS读网页的代码

VBS调用Windows API函数的代码

用vbs实现枚举网络连接的代码

VBS 数字转英文代码

精品推荐
分类导航