If you are planning to run the required VBA Code from within a regularly used Database we can write code to cross-check the Sync schedule set in a parameter table and invoke the Sync Program to do the job. You may write the necessary code like the following example for a one way Sync routine or two way Synchronization:
Code:
Sub SendChangeToReplicaX()
Dim dbsNorthwind As Database
' Opens the replicable database Northwind.mdb.
Set dbsNorthwind = OpenDatabase("Northwind.mdb")
' Sends data or structural changes to the replica.
dbsNorthwind.Synchronize "Nwreplica.mdb", _
dbRepExportChanges
dbsNorthwind.Close
End Sub
Two way Sync:
Code:
Sub TwoWayExchangeX()
Dim dbsNorthwind As Database
Set dbsNorthwind = OpenDatabase("Northwind.mdb")
' Sends changes made in each replica to the other.
dbsNorthwind.Synchronize "Nwreplica.mdb", _
dbRepImpExpChanges
dbsNorthwind.Close
End Sub
Internet Synchronize:
Code:
Sub InternetSynchronizeX()
Dim dbsTemp As Database
Set dbsTemp = OpenDatabase("C:\Data\OrdEntry.mdb")
' Synchronize the local database with the replica on
' the Internet server.
dbsTemp.Synchronize _
"www.mycompany.myserver.com" _
& "/files/Orders.mdb", _
dbRepImpExpChanges + dbRepSyncInternet
dbsTemp.Close
End Sub
There is a Blog Post that explains how to send Weekly e-mails automatically (Automated E-Mail Alerts) on schedule without User's intervention. This may give you ideas to write code for your problem.