Ok,

I think I've found something..

Under the heading INTERNET_CONNECTED_INFO the following is stated:

<i>Start a new ActiveX Document project. UserDocument1 is added by default.


Add the following code to the general declarations section of UserDocument1: 

Dim bOffline As Boolean

Private Function get_Offline() As Boolean ' (VARIANT_BOOL * bOffline)
 Dim hr As Long
 Dim ci As INTERNET_CONNECTED_INFO
 Dim ci_len As Long
 ci_len = 8
 Dim ret As Long

 ret = InternetQueryOption(0&amp;, INTERNET_OPTION_CONNECTED_STATE, _
        ci, ci_len)
get_Offline = Not ((ci.dwConnectedState And INTERNET_STATE_CONNECTED) = 
INTERNET_STATE_CONNECTED)
End Function

Private Sub put_Offline(bOffline As Boolean)
  Dim hr As Long
  Dim ci As INTERNET_CONNECTED_INFO
  Dim ret As Long
  If bOffline Then
     ci.dwConnectedState = INTERNET_STATE_DISCONNECTED_BY_USER
     ci.dwFlags = ISO_FORCE_DISCONNECTED
  Else
     ci.dwConnectedState = INTERNET_STATE_CONNECTED
  End If

  ret = InternetSetOption(0&amp;, INTERNET_OPTION_CONNECTED_STATE, _
               ci, LenB(ci))
End Sub </i>

Can anyone help me figure out how to call this from VFP?

Appreciated!

Best,

DD


>Hi folks,
>
>I am interested in being able to determine where I can determine what the 'Work offline' capability of Internet Explorer is. I've looked online at MSDN and so forth but somehow have been unable to locate a source of good information.
>
>I was wondering if anyone knows where I can find this info?
>
>Thanks!!!
>
>Best,
>
>DD