Scriptbox
 VBScript Links 
 About VBscript 
 JavaScript Links 
 About JavaScript 
 Powershell Links 
 PSCRIPT the Script Launcher 
 PowerShell Shortcut Keys 
 About Powershell 
     VBScript
    JavaScript
    Powershell
Disclaimer
Contact
Latest 10 Scripts
Script search
  :: { Category } :: 0-9ABCDEFGHIJKLMNOPQRSTUVWXYZ
         

Search Options:  WMI  SystemRestore  Query  

 Content of WMI SystemRestore Query.vbs
MD5 Hash: BAAEA6237E5E51CD8D95C3350E8BCB3D
On Error Resume Next

Const wbemFlagReturnImmediately = &h10
Const wbemFlagForwardOnly = &h20

arrComputers = Array(".")
For Each strComputer In arrComputers
WScript.Echo
WScript.Echo "=========================================="
WScript.Echo "Computer: " & strComputer
WScript.Echo "=========================================="

Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\DEFAULT")
Set colItems = objWMIService.ExecQuery("SELECT * FROM SystemRestore", "WQL", _
wbemFlagReturnImmediately + wbemFlagForwardOnly)

For Each objItem In colItems
WScript.Echo "CreationTime: " & objItem.CreationTime
WScript.Echo "Description: " & objItem.Description
WScript.Echo "EventType: " & objItem.EventType
WScript.Echo "RestorePointType: " & objItem.RestorePointType
WScript.Echo "SequenceNumber: " & objItem.SequenceNumber
WScript.Echo
Next
Next

   © 2008 - 2013 Boris Toll      :: Scripts available: 6.481 ::      :: scriptbox.toll.at ::      :: powered by www.toll.at ::
  Google Entries:n/a
  Yahoo Backlinks:n/a
  Live Backlinks:n/a
  del.icio.us Bookmarks:n/a
  Technorati Links:n/a