R
Rene
Hello group,
A back-end DB resides on a Win2K Server, and front-ends on Win2K clients.
When the front-end starts, I have it check that the link information is
valid.
So it loops through all (4) tables calling the following function, giving
the user a message if the back-end cannot be accessed.
Public Function fTableLinkOK(strTableName as String) as Boolean
On Error Resume Next
Set dbDatabase = CurrentDB()
Set tdefTable = dbDatabase(strTableName)
strField = tdefTable.Fields(0).Name
fTableLinkOK = (Err.Number = 0)
Set tdefTable = Nothing
Set dbDatabase = Nothing
End Function
My problem is this portion of the startup takes very very long - like over a
minute!!
Any suggestions?
Is it possible this code causes the whole back-end tables' contents to be
sent to client??
Thanx.
René
Montreal
A back-end DB resides on a Win2K Server, and front-ends on Win2K clients.
When the front-end starts, I have it check that the link information is
valid.
So it loops through all (4) tables calling the following function, giving
the user a message if the back-end cannot be accessed.
Public Function fTableLinkOK(strTableName as String) as Boolean
On Error Resume Next
Set dbDatabase = CurrentDB()
Set tdefTable = dbDatabase(strTableName)
strField = tdefTable.Fields(0).Name
fTableLinkOK = (Err.Number = 0)
Set tdefTable = Nothing
Set dbDatabase = Nothing
End Function
My problem is this portion of the startup takes very very long - like over a
minute!!
Any suggestions?
Is it possible this code causes the whole back-end tables' contents to be
sent to client??
Thanx.
René
Montreal