Code:
$Version = Readvalue("\\$computer\HKLM\SOFTWARE\Microsoft\Internet Explorer", "Version")
is not so good.. try this
 Code:
$Version = Readvalue('\\' + $computer + '\HKLM\SOFTWARE\Microsoft\Internet Explorer', 'Version')
to keep the vars out of the strings.

I'd use one of the Ping() UDFs -
 Code:
If Ping($Computer)
  $Version = Readvalue('\\' + $computer + '\HKLM\SOFTWARE\Microsoft\Internet Explorer', 'Version')
Else
  $Version = 'No response'
EndIf
The basic Ping UDF should do the job - just be sure to include it in your script.

Glenn
_________________________
Actually I am a Rocket Scientist! \:D