Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Is there a live Internet Connection
Message
From
20/06/2007 02:30:39
 
 
To
19/06/2007 23:18:07
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Environment versions
Visual FoxPro:
VFP 8 SP1
Miscellaneous
Thread ID:
01234421
Message ID:
01234429
Views:
11
>This question was asked quite a while ago and I seem to recall Tore posting a response. Unfortunately, I no longer have the code.
>
>How can I determine if my workstation has a live internet connection? The goal is to build a log showing up/down time so this will need to run from a timer.
>
>Thanks to all...........Rich

Do you mean this simple function?
Function InternetOK
LParameters m.URL

#define FLAG_ICC_FORCE_CONNECTION 0x01

DECLARE INTEGER InternetCheckConnection IN wininet STRING lpszUrlSTRING, INTEGER dwFlags,;
 INTEGER dwReserved
Return InternetCheckConnection(m.URL,FLAG_ICC_FORCE_CONNECTION,0)=1
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform