<div>
You may use following code (source: <a href="http://www.News2news.com" rel="ugc">www.News2news.com</a>):
<pre><code id="code-20-39618950-1">DO declare
 
LOCAL nDst, nHop, nRTT
nDst = inet_addr(&quot;217.198.114.255&quot;)  &amp;&amp; celba.cz
 
STORE 0 TO nHop, nRTT
 
IF GetRTTAndHopCount(nDst, @nHop, 50, @nRTT) &lt;&gt; 0
    ? &quot;Hop count to the destination:&quot;, nHop
    ? &quot;Round-trip time, in milliseconds:&quot;, nRTT
ELSE
* on error, GetLastError may still return zero
    ? &quot;Error&quot;
ENDIF
* end of main
 
PROCEDURE declare
    DECLARE INTEGER GetRTTAndHopCount IN Iphlpapi;
        INTEGER DestIpAddress, LONG @HopCount,;
        INTEGER MaxHops, LONG @RTT
 
    DECLARE INTEGER inet_addr IN ws2_32 STRING cp</code></pre>
 but it also takes time when you are not connected...
</div>


You may use following code (source: www.News2news.com [http://www.News2news.com]):

DO declare
 
LOCAL nDst, nHop, nRTT
nDst = inet_addr("217.198.114.255")  && celba.cz
 
STORE 0 TO nHop, nRTT
 
IF GetRTTAndHopCount(nDst, @nHop, 50, @nRTT) <> 0
    ? "Hop count to the destination:", nHop
    ? "Round-trip time, in milliseconds:", nRTT
ELSE
* on error, GetLastError may still return zero
    ? "Error"
ENDIF
* end of main
 
PROCEDURE declare
    DECLARE INTEGER GetRTTAndHopCount IN Iphlpapi;
        INTEGER DestIpAddress, LONG @HopCount,;
        INTEGER MaxHops, LONG @RTT
 
    DECLARE INTEGER inet_addr IN ws2_32 STRING cp

but it also takes time when you are not connected...

<div>
<div class="content wysiwyg-content">
Hi Expert<br />
I use the following code to connect to a server on WAN using ipaddress.<br />
<br />
lcStr = &quot;Driver={SQL SERVER};Server=&amp;SERVERIP;D<wbr />atabase=Au<wbr />to;UID=myn<wbr />ame;pwd=my<wbr />pass;Trust<wbr />ed_Connect<wbr />ion=no;&quot;<br />
lnHandle = Sqlstringconnect(lcStr)<br />
If lnHandle&gt;=1<br />
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;lnResult = SQLExec(lnHandle, &quot;SELECT * FROM loged &quot;, &quot;cOutData2&quot;)<br />
endif<br />
<br />
it works fine,but if the server is off line it takes a long time to come back.<br />
<br />
Is there any way I can check this ipaddress machine is online before trying to get the information?<br />
Thanks
</div>
</div>


Hi Expert
I use the following code to connect to a server on WAN using ipaddress.

lcStr = "Driver={SQL SERVER};Server=&SERVERIP;Database=Auto;UID=myname;pwd=mypass;Trusted_Connection=no;"
lnHandle = Sqlstringconnect(lcStr)
If lnHandle>=1
	lnResult = SQLExec(lnHandle, "SELECT * FROM loged ", "cOutData2")
endif

it works fine,but if the server is off line it takes a long time to come back.

Is there any way I can check this ipaddress machine is online before trying to get the information?
Thanks

Check if WAN machine is online before connecting

Visual FoxPro (VFP), and its predecessor FoxPro, is a data-centric, object-oriented, procedural, database programming language and IDE from Microsoft last released in 2007 that still has some active use due to its low cost of deployment and fairly rapid development. In 2008, Microsoft released a set of add-ons for VFP's xBase components to allow interoperability with various Microsoft technologies. It allows data processing against its native file-based data tables or database servers such as SQL Server.