Vous n'êtes pas identifié(e).

#1 01/08/2014 16:40:57

Lier des table PostgreSQL dana Access avec ADOX

Bonjour,
J'ai besoin de lier des tables PostgreSQL v9 dans Microsoft Access 2013.
Je dispose d'une source de données système (DSN) qui est fonctionnelle dans ADODB et ADOX.
Voici le code utilisé :

    Dim ADcon As ADODB.Connection
    DIM AXcat As ADOX.Catalog, AXLiaison As ADOX.Table
    DIM strNomTable as string

    Set ADcon = New ADODB.Connection
    ADcon.Provider = "MSDASQL"
    ADcon.Open "DSN=TEST"
    Set AXcat = New ADOX.Catalog
    AXcat.ActiveConnection = ADcon
    
    strNomTable = "animal"
    Set AXLiaison = New ADOX.Table
    AXLiaison.Name = strNomTable
    AXLiaison.ParentCatalog = AXcat

    AXLiaison.Properties("MSDASQL:Create Link").Value = True
    AXLiaison.Properties("MSDASQL:Remote Table Name").Value = "public." & strNomTable
    AXLiaison.Properties("MSDASQL:Link Provider String").Value = "ODBC;DSN=TEST"

    AXcat.Tables.Append strNomTable
    AXcat.Tables.Refresh

Les lignes AXLiaison.Properties("... déclenchent une erreur 3265 (Impossible de trouver l'objet dans la collection ...) !?
Où se situe mon erreur ?
Où puis-je trouver le détail des valeurs avec leur syntaxe concernant Table.Properties dans le cas de la liaison d'une table ProstgreSQL avec ADOX ?
Vous en remerciant par avance,
Cordialement.

Luc

Hors ligne

Pied de page des forums