最新国产好看的视频,伊人天堂AV在线,国产Aaaaaa视频,蜜臀视频在线观看一区,人妻av色图,密臀久久久精品影片,青青视频免费观看毛片,久草在线观看视,国产三级精品色情在线

VBScript 監(jiān)控磁盤更改事件實(shí)現(xiàn)代碼

 更新時(shí)間:2013年07月28日 19:18:59   作者:  
這篇文章主要介紹了如何用vbs實(shí)現(xiàn)監(jiān)控磁盤更改事件,需要的朋友可以參考下

來(lái)自微軟官方,寫USB小偷腳本是最好不過(guò)的了

復(fù)制代碼 代碼如下:

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

相關(guān)文章

最新評(píng)論

当雄县| 武威市| 富源县| 禹州市| 阿克| 蓝田县| 奉化市| 大埔区| 南漳县| 临洮县| 方山县| 江西省| 武宣县| 富民县| 凤山市| 奉化市| 松江区| 海宁市| 永嘉县| 绥化市| 大安市| 集贤县| 勃利县| 喀喇| 西青区| 麻江县| 北流市| 云南省| 井研县| 溧阳市| 华坪县| 界首市| 丹寨县| 洞头县| 双桥区| 崇仁县| 苏尼特左旗| 抚州市| 绍兴县| 边坝县| 开化县|