devxlogo

Setting the off-line mode

Setting the off-line mode

You can programmatically set the Internet Explorer off-line mode with the InternetSetOption API, as this code snippet demonstrates:

Const INTERNET_OPTION_CONNECTED_STATE = 50Const INTERNET_STATE_CONNECTED = 1Const INTERNET_STATE_DISCONNECTED = 2Const INTERNET_STATE_DISCONNECTED_BY_USER = &H10Const INTERNET_STATE_IDLE = &H100Const INTERNET_STATE_BUSY = &H200Const ISO_FORCE_DISCONNECTED = 1Private Declare Function InternetSetOption Lib "wininet.dll" Alias _    "InternetSetOptionA" (ByVal hInternet As Long, ByVal dwOption As Long, _    lpBuffer As INTERNET_CONNECTED_INFO, ByVal dwBufferLength As Long) As _    Boolean' Force the OffLine or OnLine modeSub SetOffLineMode(ByVal offLineMode As Boolean)    Dim ci As INTERNET_CONNECTED_INFO    Dim retValue As Boolean    If offLineMode Then        ci.dwConnectedState = INTERNET_STATE_DISCONNECTED_BY_USER        ci.dwFlags = ISO_FORCE_DISCONNECTED    Else        ci.dwConnectedState = INTERNET_STATE_CONNECTED    End If    retValue = InternetSetOption(0&, INTERNET_OPTION_CONNECTED_STATE, ci, _        LenB(ci))    If retValue = False Then Err.Raise vbObjectError + 1000, , _        "An error occurred calling SetOffLineMode function"End Sub

See also  Small Business Strategies with Venmo
devxblackblue

About Our Editorial Process

At DevX, we’re dedicated to tech entrepreneurship. Our team closely follows industry shifts, new products, AI breakthroughs, technology trends, and funding announcements. Articles undergo thorough editing to ensure accuracy and clarity, reflecting DevX’s style and supporting entrepreneurs in the tech sphere.

See our full editorial policy.

About Our Journalist