TESTING THE CONNECTIONS OF LINKED TABLES AT STARTUP

As you continue to examine the sections of the ap_AppInit() function, now look at Section 3, which opens and tests the connection for a table located in the back end, with the connection being a link in the front end (see Listing 27.3.)

Listing 27.3. VideoApp(ADO).mdb: Testing the Links
 '-- Section 3: Open the table containing the list of ' linked tables and test the link. ' Open employee table. rstSharedTables.Open "tblSharedTables", cnnLocal, adOpenStatic On Error Resume Next rstSharedTables.MoveLast Dim rstTestTable As New ADODB.Recordset Dim strTableName As String strTableName = rstSharedTables!TableName rstTestTable.Open strTableName, cnnLocal, adOpenStatic lngCurrError = Err.Number If ...

Get F. Scott Barker's Microsoft® Access 2000 Power Programming now with the O’Reilly learning platform.

O’Reilly members experience books, live events, courses curated by job role, and more from O’Reilly and nearly 200 top publishers.