Thanx Lonkero

Now that part is working, but I am getting error on:
WScript.Shell
ERROR : expected ')'!
Script: D:\kix\PingVB.KIX
Line : 36

line 36 is : $Ping = $WshShell.Run("ping -n 1 " $HostName, 0, True)
_________________________
“I’ll not change you unless you don’t have intention to change yourself” --H:Quran