手机
当前位置:查字典教程网 >脚本专栏 >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检测U盘插入与弹出事件的代码

VBS 修改远程桌面端口号的代码

VBS通过WMI获取CPU使用率的代码

用VBS记录客户机操作的代码

VBS实现DOC转为文本文档的代码

VBS读网页的代码

VBS模拟POST上传文件的代码

VBS获取重定向的URL的代码

精品推荐
分类导航