Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
checking for a connection to the web
Hi,
I have a program that opens up a file on a server, the user will have to be online for this to happen, is there any code i can you to check weather the user has a connection. regards johny |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
checking for a connection to the web
See Randy Birch's site/pages at www.mvps.org
-- Regards, Tom Ogilvy wrote in message ups.com... Hi, I have a program that opens up a file on a server, the user will have to be online for this to happen, is there any code i can you to check weather the user has a connection. regards johny |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
checking for a connection to the web
Here's a simple version that might help.
Option Explicit Option Private Module Private Declare Function InternetGetConnectedState Lib "wininet" _ (ByRef dwFlags As Long, _ ByVal dwReserved As Long) As Long Private Declare Function InternetCheckConnection Lib "wininet.dll" _ Alias "InternetCheckConnectionA" (ByVal sUrl As String, _ ByVal lFlags As Long, ByVal lReserved As Long) As Long Public Function IsNetConnected() As Boolean Dim lReturn As Long 'you might want to put a get out clause in here that returns true 'if the test is taking place behind a proxy server, which sometimes doesn't work 'e.g. this checks a registry setting for an option to disable the function 'you can omit the next 4 lines if this is beyond your needs If CBool(GetSetting("ProgName", "Settings", "DisableNetDetect", "FALSE")) Then IsNetConnected = True Exit Function End If IsNetConnected = InternetGetConnectedState(lReturn, 0) If IsNetConnected = False Then _ IsNetConnected = InternetCheckConnection("http://www.yahoo.com", 1, 0) If IsNetConnected = False Then _ MsgBox "You do not appear to have an active internet connection at this time" _ & vbcrlf & "Please connect to the internet then retry this command", _ vbOKOnly + vbInformation End Function Robin Hammond www.enhanceddatasystems.com wrote in message ups.com... Hi, I have a program that opens up a file on a server, the user will have to be online for this to happen, is there any code i can you to check weather the user has a connection. regards johny |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
always recheck data connection library for latest connection strin | Excel Discussion (Misc queries) | |||
Spell Checking with checking cell notes | Excel Discussion (Misc queries) | |||
no DDE connection?? | Excel Discussion (Misc queries) | |||
Checking if you have a network connection | Excel Discussion (Misc queries) | |||
SQL Connection | Excel Programming |