Here you go..
code:
BREAK ON
CLS
;Requires WMIQuery > http://www.kixtart.org/board/ultimatebb.php?ubb=get_topic;f=12;t=000117
;http://msdn.microsoft.com/library/default.asp?url=/library/en-us/wmisdk/wmi/win32_systemenclosure.asp
;Thanks Radimus for the inspiration!!
$casetype=WMIQuery('ChassisTypes','Win32_SystemEnclosure')[0]

?$casetype

FOR EACH $lt IN split($casetype, '8,9,10,11')
$lt="Lap"
NEXT

IF $lt<>""
?'PORTABLE'
ELSE
?'DESKTOP'
ENDIF

get $k

;Portable units would be
;--
;8 Portable
;9 Laptop
;10 Notebook
;11 Hand Held

;Desktops would be
;--
;1 Other
;2 Unknown
;3 Desktop
;4 Low Profile Desktop
;5 Pizza Box
;6 Mini Tower
;7 Tower
;12 Docking Station
;13 All in One
;14 Sub Notebook
;15 Space-Saving
;16 Lunch Box
;17 Main System Chassis
;18 Expansion Chassis
;19 SubChassis
;20 Bus Expansion Chassis
;21 Peripheral Chassis
;22 Storage Chassis
;23 Rack Mount Chassis
;24 Sealed-Case PC

Thanks,

Kent

[ 22. September 2003, 17:36: Message edited by: kdyer ]
_________________________
Utilize these resources:
UDFs (Full List)
KiXtart FAQ & How to's