Discussion :

[gilles_906]

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.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Dim CONN As New ADODB.Connection

Merci d'avance à qui pourra m'aider

[Pol63]

ton lien dit :

Les techniques présentées dans cet article doivent uniquement servir comme mesure temporaire pendant la migration vers ADO.NET

donc utilises ADO.NET plutot qu'ADO

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

dim conn as new system.data.oledb.oledbconnection

[gilles_906]

Merci Pol63 d'avoir pris du temps pour te pencher sur mon problème.

C'est justement parce que le lien disait ca que je n'ai même pas voulu essayer d'installer le fichier qu'il donne sur les ordi 32 bits.

J'avais bien essayé de faire la connection comme tu l'as it mais le probleme se retrouve du coup un peu plus loin.

cela donne ca

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
  Sub TwoWayDirectSync(ByVal strReplica1 As String, ByVal strReplica2 As String)
     Try
        Dim repReplica As New JRO.Replica
 
        Dim CONN As OleDbConnection = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data source=" & strReplica1 & "")
 
        CONN.Open()
 
        repReplica.ActiveConnection = CONN
 
 
            repReplica.Synchronize(strReplica2, JRO.SyncTypeEnum.jrSyncTypeImpExp, JRO.SyncModeEnum.jrSyncModeDirect)
            CONN.Close()
        Catch ex As Exception
            MessageBox.Show(ex.Message)
        End Try
 
    End Sub

Mais a ce niveau

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 repReplica.ActiveConnection = CONN

j'ai cette erreur:

Le cast spécifié n'est pas valide.

Pourtant il faut bien que repReplica devienne la connexion active pour pouvoir dans l’instruction suivante synchroniser la connexion active avec repReplica2

edit:
Est ce que cette instruction ainsi que celle qui me donne une erreur ne serait pas uniquement sur ADO?

Dim repReplica As New JRO.Replica

Si oui connais tu la class qui permet de synchroniser deux BDD avec ado.net

Merci d'avance

[Pol63]

en effet, jro.replica n'est fait que pour un ado connection et non ado.net
et access n'est plus que moyennement supporté par microsoft ...

si tu peux, change de base de données pour une vraie base de données (sql server express (moteur réseau) ou sql server ce (base fichier) sont gratuits)

[gilles_906]

Pas possible de changer de BDD il me faut trouver une autre solution.

C'est quand même fou qu'ado.net ne supporte pas la réplication access.

Aurais tu une autre piste?
Merci

[Pol63]

C'est quand même fou qu'ado.net ne supporte pas la réplication access.

c'est une question de point de vue
pour moi ce qui est fou c'est qu'access existe encore et soit encore utilisé ...
quand on a testé un vrai sgbdr, on comprend pourquoi access n'en est pas un !

Aurais tu une autre piste?

il faudrait que je comprenne exactement le souci ...
vu que tu n'utilises pas ado.net et que ca bug, je pourrais supposer que vb.net n'est pas le problème ici, mais indirectement windows 7

il faudrait donc identifier qui cause réellement le dysfonctionnement (vb.net ? ms jet ? ado ? jro ?)
et remplacer cette partie
vb.net => un petit exe vb6 qui ne fera que ca appelé par ton exe vb.net
ms jet => je ne vois pas trop, jet est fournit avec windows sur les versions récentes
ado => pas d'idée
jro => il y a aussi plusieurs versions mais ca doit être fournit avec windows et un downgrade n'est peut etre pas possible