VBScript 監(jiān)控磁盤更改事件實現(xiàn)代碼
更新時間：2013年07月28日 19:18:59 作者：
這篇文章主要介紹了如何用vbs實現(xiàn)監(jiān)控磁盤更改事件，需要的朋友可以參考下
來自微軟官方，寫USB小偷腳本是最好不過的了
復(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)文章
VBS 強制關(guān)閉Symantec Endpoint Protection的代碼
很多企業(yè)電腦系統(tǒng)是Windows Xp，使用Windows server 2003 來控制，其中客戶端得殺毒軟件有不少是使用 Symantec Endpoint Protection2013-01-01
VBS教程：函數(shù)-DateDiff 函數(shù)
VBS教程：函數(shù)-DateDiff 函數(shù)...2006-11-11
vbs實現(xiàn)myipneighbors 域名查詢結(jié)果整理
把myipneighbors查詢的結(jié)果COPY下來,然后保存后,拖到此腳本上,進行整理因為myipneighbors有驗證碼,能力有限,沒辦法突破..只能先這樣了.2009-07-07
利用WScript.Shell對象隱藏cmd命令行運行框的實現(xiàn)代碼
利用WScript.Shell對象隱藏cmd命令行運行2009-12-12
有時從網(wǎng)上的電子書網(wǎng)站上下載解壓后。得到的是多個TXT文本。有沒有辦法把多個TXT合在一起看呢？寫了個代碼。不是很完美，歡迎高手批評指教。 我只是個菜鳥，需要大家的關(guān)懷才能進步哇2013-01-01
自己最近沒事研究注冊表，下面我想將自己找到的一些實用的VBS腳本送給大家2008-06-06
VBS教程：函數(shù)-Eval 函數(shù)...2006-11-11
VBScript教程 第十四課在VBScript中使用對象...2006-11-11
這篇文章主要介紹了使用 iisext.vbs 啟用應(yīng)用程序的相關(guān)資料,需要的朋友可以參考下2014-07-07
用vbs實現(xiàn)的批量文件的替換2008-05-05