Database Synchronization with the Microsoft Sync Framework: Listing 1.

Calling the custom synchronization library from Visual Basic.

Public Sub Sample_SQLStandard_SQLExpress_Sync()
  Dim dbSS8_SX8_TT_SyncInfo As New DatabaseSyncInfo
  Dim dbSS8_SX8_TT_Helper As SynchronizationHelper

  dbSS8_SX8_TT_SyncInfo.LocalConnectionString = 
    My.Settings.SQLServerTrackingTablesConnectionString
  dbSS8_SX8_TT_SyncInfo.LocalDriverType = eSyncDriverType.SQLServer
  dbSS8_SX8_TT_SyncInfo.RemoteConnectionString = 
    My.Settings.SQLExpressTrackingTablesConnectionString
  dbSS8_SX8_TT_SyncInfo.RemoteDriverType = eSyncDriverType.SQLServer
  dbSS8_SX8_TT_SyncInfo.ScopeName = My.Settings.ScopeName
  dbSS8_SX8_TT_SyncInfo.FillSyncTables(My.Settings.SyncTables)
  dbSS8_SX8_TT_Helper = New SynchronizationHelper(dbSS8_SX8_TT_SyncInfo)
  Dim SyncStats As Microsoft.Synchronization.SyncOperationStatistics = 
    dbSS8_SX8_TT_Helper.DoSync(Nothing)
  'Display SyncStats to user if desired
  'The DoSync() parameter is an optional ListBox to show in-progress 
    status information if desired
  End Sub

About the Author

Joe Kunk is a Microsoft MVP in Visual Basic, three-time president of the Greater Lansing User Group for .NET, and developer for Dart Container Corporation of Mason, Michigan. He's been developing software for over 30 years and has worked in the education, government, financial and manufacturing industries. Kunk's co-authored the book "Professional DevExpress ASP.NET Controls" (Wrox Programmer to Programmer, 2009). He can be reached via email at [email protected].

comments powered by Disqus

Featured

Subscribe on YouTube