I think you are right its not the code.

I have slightly modified the code to show the steps in the code:
 Code:
Break On

Sleep 3
$a = WSHPipe('ping localhost', 1)
Sleep 3

;Function: 
;   WshPipe() 
; 
;Author: 
;   Christopher Shilt (christopher.shilt@relizon.com) 
Function WshPipe($ShellCMD, OPTIONAL $NoEcho)
	Dim $oExec, $Output
	
  $oExec = CreateObject("WScript.Shell").Exec($ShellCMD)
  ? 1
  Get $
  
  If Not VarType($oExec) = 9
    $WshPipe="WScript.Shell Exec Unsupported"
    Exit 10
  EndIf
  
  $Output = $oExec.StdOut.ReadAll + $oExec.StdErr.ReadAll
  ? 2
  Get $
  
  If Not $NoEcho
    $Output
  EndIf
	
  $WshPipe=Split(Join(Split($Output,Chr(13)),''),Chr(10))
  Exit($oExec.ExitCode)
  
EndFunction


I think what is being seen is the output (maybe output is not the correct word) of ping.exe its self.
_________________________
Wait don't order yet,... get KiXforms Designer .NET 2.0 (Beta)
KiXforms Designer .NET 2.0 (Beta)