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
0 commentaires:
Enregistrer un commentaire