you are right buddy that was the issue, now it is working, basically I am trying to find out laptop's in my network here is my latest code.

code:
 
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=KeyExist('\\$computer\HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\CompBatt')
? $rdd
If ($RDD=1)
? "$computer is laptop"
Open(1,"C:\laptop2k.TXT",5)
WriteLine (1,"$computer"+@CRLF)
Close(1)
EndIf
EndIf
EndIf
Next

but I foung the reg. key which I am serching for LAptop is existing in some of my compaq PC's (D51c HP) can some body tell me any uneeque key which is only there in Laptop ??
_________________________
“I’ll not change you unless you don’t have intention to change yourself” --H:Quran