In windows, there are some tools provided by Microsoft called Windows Management Instrumentation (WMI) . Its a service which included in windows server to access the magic in the server, like processor, disk status, network status, OS, software installed and other low level information to windows.
It is available in Windows XP, windows 7 , Windows server 2003 and up. But in windows server 2003 the WMI is not installed by default. You should install the WMI provider.
To install manually go to control panel >> add remove programs >> add/remove windows component >> management and monitoring tools >> WMI Windows Installer Provider
With the WMI installed, we can query the OS locally or from remote machine using VBScript. This is handy for network admin, system admin who want to know the status of their server automatically by script access.
Actually many monitoring application utilize this service. If you can do programming, you can build a product from the service.
I will give some example that i have to query the os and the application installed in the server. Here are scanner.vbs
strComputer = "server1"
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colOSes = objWMIService.ExecQuery("Select * from Win32_OperatingSystem")
For Each objOS in colOSes
strFileName ="c:\Microsoft_Installations\"& objOS.CSName & "_Microsoft_Installation.xls"
hostname=objOS.CSName
os=objOS.SerialNumber & " " & objOS.Caption & " " & objOS.Version & " " & objOS.ServicePackMajorVersion & "." & objOS.ServicePackMinorVersion
install_date=objOS.InstallDate
Next
Set objFilei = objFSO.CreateTextFile(strFilename, True)
objFilei.WriteLine os & vbtab & _
install_date
objFilei.Close
The script will create a file defined in strFileName and get a OS information with serial number and the OS Version.Hope this help someone who need scripting with Windows WMI.
0 comments:
Post a Comment