A. You can use Windows Management Instrumentation (WMI) to query the OperatingSystem information on the local machine. To do so, run the following script, which you can download at http://www.windowsitpro.com/content/content/46759/OSinfo.zip
strComputer = "." Set WshShell = WScript.CreateObject("WScript.Shell") Dim WshShell Set objWMIService = GetObject("winmgmts:" &_ "\{impersonationLevel=impersonate\}!\\" & strComputer & _ "\root\cimv2") Set colOperatingSystems = objWMIService.ExecQuery ("Select * from _ Win32_OperatingSystem") For Each objOperatingSystem in colOperatingSystems if objOperatingSystem.Caption = "Microsoft Windows 2000_ Professional" then wscript.echo "2000" if objOperatingSystem.Caption = "Microsoft Windows XP _ Professional" then wscript.echo "XP" NextYou can modify the script to perform various other actions and add other OSs by adding more "if" clauses. You can determine the name of other OSs by running the following script, which you can download at http://www.windowsitpro.com/content/content/46759/OtherOS.zip, on the local machine:
strComputer = "." Set WshShell = WScript.CreateObject("WScript.Shell") Dim WshShell Set objWMIService = GetObject("winmgmts:" & _ "\{impersonationLevel=impersonate\}!\\" & strComputer & _ "\root\cimv2") Set colOperatingSystems = objWMIService.ExecQuery ("Select * from _ Win32_OperatingSystem") For Each objOperatingSystem in colOperatingSystems wscript.echo objOperatingSystem.Caption NextIf you run the script on a machine that uses Windows Server 2003, Standard Edition, for example, you'll see output similar to that which the figure shows. Thus, to determine whether the machine is running Windows 2003 Standard, you add the following line to the OS check portion of the main script:
if objOperatingSystem.Caption = "Microsoft(R) Windows(R) _ Server 2003, Standard Edition " then wscript.echo "2003 Std"
1 comment
Hide comments