ErrorMessage property
Read-only.
This property contains the text of error message, if the Ping operation has not be finished
successfully. In case of successful operation the property contains the empty string.
Example
Set tcpip = CreateObject("SHOTIP.Connection")
Set pdata = tcpip.Ping(thathost)
if pdata.ErrorMessage <> "" then
Response.Write "Critical error: " & pdata.ErrorMessage
end if