I don't even bother to pipe to find.
Code:

Function Ping($PC)
  Dim $PC
  Shell'%comspec% /c ping -n 1 '+$PC+' >nul'
  $Ping = NOT @error
EndFunction
_________________________
Give a man a fish and he will be back for more. Slap him with a fish and he will go away forever.