Jim,
I got to thinking...
Why use DNS to resolve the DNS name which may fail when WINS also holds the NETBIOS name?

So I replaced the *Resolve the hostname* section with this:

code:
;*********Resolve the hostname**********
$HostArray = WshPipe("%comspec% /c nbtstat -a $IP",1)
$X = InStrArray("<00>  UNIQUE", $HostArray)
if $X <> -1
   $txtHost.text = Trim(Split($HostArray[$X],"<")[0])
else
   $txtHost.text = "Not Found in WINS" ?
endif
$Host = $txtHost.text
_________________________
Give a man a fish and he will be back for more. Slap him with a fish and he will go away forever.