June 1999
Intermediate to advanced
1368 pages
29h 45m
English
Although Chapter 28 discusses replicating code tables, I thought it would be worthwhile to look briefly at ap_CheckReplicatedTables in this chapter (see Listing 27.6).
Sub ap_CheckReplicatedTables() Dim catLocal As New ADOX.Catalog Dim rstCheckRep As New ADODB.Recordset Dim cmdUpdateRep As New ADODB.Command Dim strTableName As String On Error GoTo Error_ap_CheckReplicatedTables Set catLocal.ActiveConnection = CurrentProject.Connection DoCmd.Echo True, "Checking for Replicated Tables..." '-- Attach the backend replicated table '-- and open the query that shows updated replicated tables On Error Resume Next catLocal.Tables.Delete "tblBackEndReplicatedTables" ... |
Read now
Unlock full access