Checking for a connection...

[BPMan]

is is possible to check to see if a computer is connected to a network........
and if so how....
thanks
BPMan

 

[caseye]

If you are trying to connect you can use this

Sub conntectToDb()
On Error goto eh

Dim DBConn as ADODBconnection
DBConn.open(connstring)
Exit Sub
eh: 'error unable to connect
End Sub

 

[BPMan]

well what i do is use a access database that is stored on the server.........
buy what i want to is if the user is not connected to the internet just out put a message at the start of my program and then end my program..........
...........

 

[lovell811]

try something like this:
put this after your connection is opened

dim msg as integer

If connectionname(like DBConn above).state = 0 then
msg = msgbox("You're not connected to the network&quot
if msg = 0 then
end
end if
end if ----------------
Joe