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 one of the tables located in the back end, with the connection being a link in the front end.
'-- Section 3: Open the table containing the list of linked tables Set dynSharedTables = dbLocal.OpenRecordset("tblSharedTables", _ dbOpenDynaset) On Error Resume Next dynSharedTables.MoveLast Set dynTestTable = dbLocal.OpenRecordset(dynSharedTables!TableName, _ dbOpenDynaset) intCurrError = Err.Number strCurrError = Err.Description Do Until intCurrError = 0 On Error GoTo Error_ap_App_Init Select Case intCurrError Case apErrFileNotFound, apErrTableNotFound, _ apErrPathNotValid, ...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.
