I'm in the process of developing an application where my users will
take a replicated db out of the office on a laptop and, upon their
return, sync to the master db on the company network.

I'm trying to use the code below to initate the sync process from the
replica (after connecting to the network the users would click a button
in their laptop-based replicated db and it would sync with the master).

The code runs smoothly (no errors), but nothing is transferred ineither
direction during the sync.  If I manually sync the db's from the
master, using Tools-->Replication-->Syncronize Now menu command,
everything syncs correctly and data is transferred.  My code seems to
be goofed....

CODE:

Private Sub SynchDb_Click()
   Dim dbTestCxn           As DAO.Database
   Dim dbSynch             As DAO.Database
   Dim strTestDbPath       As String
   Dim strSynchFieldDb     As String
   Dim strSynchNetworkDb   As String

   'test network connection to a known db
   strTestDbPath =
"\\server1\user\GIS\applications\InspectionsDb\NetworkConnectionTest.mdb"
   'standard location of inspection db on tablet pc - currently on
network for testing
   strSynchFieldDb =
"\\server1\user\ErosionAndSedimentControl\ConstructionSiteESC\Erosion
Control Access Database\Database\InspectionRep.mdb"
   'standard network location for master inspections db
   strSynchNetworkDb = "\\server1\User\HDG\db\Inspection.mdb"

   On Error Resume Next
   Set dbTestCxn = DBEngine.OpenDatabase(strTestDbPath)
   CheckLinks = (Err.Number = 0)   'If no error there is a network
conneciton, return True.
   dbTestCxn.Close

   If CheckLinks = True Then
       Set dbSynch = DBEngine.OpenDatabase(strSynchFieldDb)
       dbSynch.Synchronize strSynchNetworkDb, dbRepImpExpChanges
       dbSynch.Close
       Set dbSynch = Nothing
       Set dbTestCxn = Nothing
       MsgBox ("Done.  The databases have been successfully updated.")
   Else
      MsgBox ("You are not connected to the Company network.  You
cannot transfer data at this time.")
       Set dbSynch = Nothing
       Set dbTestCxn = Nothing
   End If

End Sub

QUESTIONS:
1) is there some issue with my testing the master and resplica both on
the network - not having the replica actually on a laptop?  I wouldn't
think this would be the case, but I'm stumped.

2) do I need to physically close the replica db through code before the
sync will work (and then reopen after the sync)?

Any suggestions would be welcome.  Thanks.

HGil