www.infralib.com

www.infralib.com
Yeni sitemiz http://www.infralib.com 'u ziyaret ediniz. Yeni yazılarım başka yazarlarında katkılarıyla artık bu adreste. Ayrıca çok yakında forum, video, webcast gibi bölümlerde yayında olacak.

16 Apr 2011

Script ile yuklenmis Hotfix updatelerini listelemek

Asagidaki scriptten faydalanarak bir bilgisayara yuklenmis yamalari rahatca listeleyebilirsiniz, script te biraz degisiklik yaparak script ile uzak bilgisayarlardan da bu bilgileri cekip bir veritabanina yada Excel ile acabileceginiz basit bir CSV dosyasina yazdirabilirsiniz, daha faza script icin Microsoft'un Script Center sitesini tavsiye ederim.

strComputer = "." 
Set objWMIService = GetObject("winmgmts:" _ 
    & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") 
 
Set colQuickFixes = objWMIService.ExecQuery _ 
    ("Select * from Win32_QuickFixEngineering") 
 
For Each objQuickFix in colQuickFixes 
    Wscript.Echo "Computer: " & objQuickFix.CSName 
    Wscript.Echo "Description: " & objQuickFix.Description 
    Wscript.Echo "Hot Fix ID: " & objQuickFix.HotFixID 
    Wscript.Echo "Installation Date: " & objQuickFix.InstallDate 
    Wscript.Echo "Installed By: " & objQuickFix.InstalledBy 
Next