Bonsoir
Je me sers de la réplication Access pour synchroniser deux bases .mdb
Sur l'ordi de develloppement (Windows 7 64bits) mon code marche bien.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24
| Sub TwoWayDirectSync(ByVal strReplica1 As String, ByVal strReplica2 As String)
Dim repReplica As New JRO.Replica
Dim CONN As New ADODB.Connection
OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data source=" & strReplica1 & "")
CONN.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strReplica1 & "")
repReplica.ActiveConnection = CONN
Try
repReplica.Synchronize(strReplica2, JRO.SyncTypeEnum.jrSyncTypeImpExp, JRO.SyncModeEnum.jrSyncModeDirect)
CONN.Close()
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
End Sub |
Une fois l'appli mise sur un autre ordi j'ai une erreur qui apparait.
D'aprés ce que j'ai compris de l'erreur cela proviendrait de win 64 qui bidouillerait le connection Id etc... du coup il ne serait plus reconnu par les autres xp, vista etc...
voir ici pour les détails je suis dans le cas "message d'erreur 4"
http://support.microsoft.com/kb/2517589/fr
D'aprés microsoft soit je place sur les ordis finaux un fichier pour patcher les ordi 32bits (mais Microsoft ne conseil pas de le faire)
Soit je traduis ce code en VB.net, et la j'ai grandement besoin d'un coup de main car je ne maitrise pas suffisamment pour m'en sortir seul.
Je pense que c'est ici que le problème se trouve.
Dim CONN As New ADODB.Connection
Merci d'avance à qui pourra m'aider
Partager