Thanks Gunny.
My question was - is there a way that the database can check if the network
is connected to the laptop. So if the ethernet cable is connected, is there a
way that the database can detect that the server is available. The database
is stored on the C drive of the laptops and only connects to the server when
transferring data.
regards
neil
> Hi.
>
[quoted text clipped - 19 lines]
> http://www.Access.QBuilt.com/html/expert_contributors2.html for contact
> info.
> My question was - is there a way that the database can check if
> the network is connected to the laptop. So if the ethernet cable
> is connected, is there a way that the database can detect that the
> server is available. The database is stored on the C drive of the
> laptops and only connects to the server when transferring data.
After my sig is code that should be usable in any application with
no added references. If you want to check for a file instead, change
the objFSO.FolderExists to objFSO.FileExists and supply a filename
as the argument, instead.

Signature
David W. Fenton http://www.dfenton.com/
usenet at dfenton dot com http://www.dfenton.com/DFA/
Public Function CheckForNetwork(strFolderToCheck As String, _
Optional bolClear As Boolean = False) As Boolean
Static objFSO As Object 'late binding
If bolClear Then Set objFSO = Nothing: Exit Function
If objFSO Is Nothing Then
Set objFSO = CreateObject("Scripting.FileSystemObject")
End If
If objFSO.FolderExists(strFolderToCheck) Then
CheckForNetwork = True
Else
MsgBox "Not connected to the network!", vbExclamation, _
"Not connected"
End If
End Function
neshev - 23 Jul 2007 14:58 GMT
Thanks for your help David. great help to my database. appreciate it.
Neil
> > My question was - is there a way that the database can check if
> > the network is connected to the laptop. So if the ethernet cable
[quoted text clipped - 6 lines]
> the objFSO.FolderExists to objFSO.FileExists and supply a filename
> as the argument, instead.