Now I change the script to read the value but still not working

quote:

Call "d:\kix\udf\netview2.udf"
$computerlist=NetView2()
For Each $computer In $computerlist
$PRODUCTTYPE=ReadValue('\\'+$computer+'\HKEY_LOCAL_MACHINE\SYSTEM\CURRENTCONTROLSET\CONTROL\PRODUCTOPTIONS','PRODUCTTYPE')
If $PRODUCTTYPE="WinNT"
$regkey='\\'+$computer+'\HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion'
$regvalue='CurrentVersion'
If ReadValue($regkey,$regvalue)='5.0'
? "$computer 2k"
$RDD=ReadValue('\\'+$computer+'HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\CompBatt','DisplayName')
? $rdd
If ($RDD="Microsoft Composite Battery Driver")
? "$computer is laptop"
Open(1,"C:\laptop2k.TXT",5)
WriteLine (1,"$computer"+@CRLF)
Close(1)
EndIf
EndIf
EndIf
Next

This job is very urgent for me pls help...

I am running the script from w2k PC my KIX ver is 4.21
_________________________
“I’ll not change you unless you don’t have intention to change yourself” --H:Quran