来自微软官方,写USB小偷脚本是最好不过的了
复制代码 代码如下:
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
"{impersonationLevel=impersonate}!\\" strComputer "\root\cimv2")
Set colMonitoredEvents = objWMIService. _
ExecNotificationQuery("Select * from Win32_VolumeChangeEvent")
Do
Set objLatestEvent = colMonitoredEvents.NextEvent
Wscript.Echo objLatestEvent.DriveName
Wscript.Echo objLatestEvent.EventType
Wscript.Echo objLatestEvent.Time_Created
Loop
您可能感兴趣的文章:- vbs定期监控 值个班,定期瞄一下
- 磁盘IO利用率监控VBS脚本(windows)
- VBScript 监控并结束指定进程的代码
- VBS监控CPU的使用率(如占用率一直维持在80%超过30秒则运行某程序)
- 网络接口利用率监控VBS脚本代码(Windows)
- 进程监控实现代码[vbs+bat]
- 用VBS调用程序并对程序的运行情况进行监控的两个代码
- 如何使用vb 监控电脑活动记录