Identify windows version

[dimchik]

I am trying to identify windows xp version ether 64 bit or 32 bit or windows 2003

Edited March 5, 2008 by dimchik

[Xenobiologist]

Have a look at macros in helpfile.

[dimchik]

They Identifying Windows XP 64 bit as Windows 2003

[Xenobiologist]

Hi,

and this?

$wbemFlagReturnImmediately = 0x10
$wbemFlagForwardOnly = 0x20
$colItems = ""
$strComputer = "localhost"

$Output=""
$Output = $Output & "Computer: " & $strComputer  & @CRLF
$Output = $Output & "==========================================" & @CRLF
$objWMIService = ObjGet("winmgmts:\\" & $strComputer & "\root\CIMV2")
$colItems = $objWMIService.ExecQuery("SELECT * FROM Win32_SystemOperatingSystem", "WQL", _
                                          $wbemFlagReturnImmediately + $wbemFlagForwardOnly)

If IsObj($colItems) then
   For $objItem In $colItems
      $Output = $Output & "GroupComponent: " & $objItem.GroupComponent & @CRLF
      $Output = $Output & "PartComponent: " & $objItem.PartComponent & @CRLF
      $Output = $Output & "PrimaryOS: " & $objItem.PrimaryOS & @CRLF
      if Msgbox(1,"WMI Output",$Output) = 2 then ExitLoop
      $Output=""
   Next
Else
   Msgbox(0,"WMI Output","No WMI Objects Found for class: " & "Win32_SystemOperatingSystem" )
Endif

Mega