WScript.Shell Run-kommando kører kun 1 gang?

Heysa,

sidder og roder lidt med noget WScript i ASP.

Har smidt min WScript.Run kommando ind i en Function, for at den er lettere at kalde, men kalder man den flere gange i samme ASP-rutine så kører den kun første gang... hvorfor? og kan det løses?

Function DoPing(inIP)
Set WshShell = CreateObject("WScript.Shell")
strCmdLine = "ping " & inIP
oRun = WshShell.Run(strCmdLine, 0, True)
Set WshShell = Nothing
DoPing = oRun
End Function