you can get around the @producttype by using some older code (that we used when this wasn't available)

It is about 3 years old, and I never bothered collecting all the details for the Wintendo clients, but you can see the way it works.

The UDF OSID() has expanded on this quite a bit, but your version of kix will not run UDFs

Code:

select
Case @inwin=1
$kernel ="WinNT"
$prodkey ="HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\ProductOptions"
$prodrole="HKEY_LOCAL_MACHINE\Security\Policy\PolSrvRo"
$DCRole =READVALUE("$prodrole","(No Name)")
$type =ReadValue("$prodkey","ProductType")
$Svcpack =ReadValue("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion","CSDVersion")

$ProductSuite=""
$ProductSuite=READVALUE("$prodkey","ProductSuite")
IF LEN($ProductSuite)>0 $ProductSuite=SUBSTR($ProductSuite,1,INSTR($ProductSuite,"|")-1) EndIf

select
Case @dos=5.1 $system="WinXP"
Case @dos=5.0 $system="Win2k"
Case @dos=4.0 $system="WinNT"
endselect
select
Case $type="LANMANNT" $flavor="$DCRole $ProductSuite Domain Controller"
Case $type="ServerNT" $flavor="$ProductSuite Member Server"
Case $type="WinNT" $flavor="Professional"
endselect
Case @inwin=2
$kernel="Win9x"
$Svcpack=""
$SubVer=ReadValue("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion","SubVersionNumber")
select
Case @dos="???"
$system="WinME" $flavor="A"
Case @dos="4.10"
$system="Win98"
select
Case $subver="???" $flavor="SE"
Case $subver="a" $flavor="A"
endselect
Case @dos="4.0"
$system="Win95"
select
Case $subver=" C" $flavor="OSR2.5"
Case $subver=" B" $flavor="OSR2"
Case $subver="a" $flavor="A"
endselect
endselect
endselect

? "Kernel type is "+$kernel
? "Operating System is "+$system $Svcpack
? "OS Flavor is "+$flavor
get $k ;Pauses script to view output

_________________________
How to ask questions the smart way <-----------> Before you ask