VDF-GUIdance logo



  Visual DataFlex Logo
  

Shared knowledge leads to accumulated knowledge

        Printer Friendly Page


Size: 13 KB Download
Date Created: 06/02/2006
Date Updated: 06/02/2006
Author: Allan Kim Eriksen
Company: NordTeam Gruppen ApS
Summary:
Package to ping an ipaddress.

Ping an IP address


by Allan Kim Eriksen

This package can be used to ping a specific ip-address.

Class properties:
psIPAddress - Replying address
piStatus - Reply status
piRoundTripTime - Reply Round trip time, in milliseconds
piTimeToLive - Time to live for the ping, in milliseconds
Use ping

Object oPing is a cPing
  
  Procedure DoPing
    Get Ping  "whateverip" to iResult
    If (iResult <> ICMP_SUCCESS) begin
        Get EvaluatePingResponse  iResult to sErrorText
        Error DFERR_PROGRAM sErrorText
    End
    Else begin
        Get piStatus to iResonsetime
    End
  End_Procedure

End_Object

Download



ping package ~ 13kb