程序師世界是廣大編程愛好者互助、分享、學習的平台,程序師世界有你更精彩!
首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫知識
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
 程式師世界 >> 編程語言 >> 更多編程語言 >> 更多關於編程 >> VBScript 監控磁盤更改事件實現代碼

VBScript 監控磁盤更改事件實現代碼

編輯:更多關於編程
    這篇文章主要介紹了如何用vbs實現監控磁盤更改事件,需要的朋友可以參考下  

    來自微軟官方,寫USB小偷腳本是最好不過的了

    復制代碼 代碼如下:


    strComputer = "."
    Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!" & strComputer & "rootcimv2")
    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

    1. 上一頁:
    2. 下一頁:
    Copyright © 程式師世界 All Rights Reserved