Discussion :

[V_inSe]

Bonjour à tous,

Je bloque depuis deux jours sur la récupération des colonnes des tables d'une base de données sur PostgreSQL.
Comme le montre le code ci-dessous, j'utilise un objet ADOX.Catalog pour récupérer le contenu de ma base de données :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
   Dim MyCat As New ADOX.Catalog
    Dim table As New ADOX.table
    Dim Col As New ADOX.Column
 
    On Error GoTo ErrTableInexistante:
 
    MyCat.ActiveConnection = conString
 
    For Each table In MyCat.Tables.Count
        For Each Col In table.Columns.Count
            'traitement...
         Next
    Next

Je récupère bien mes tables. Par contre, lorsque je souhaite parcourir la collection columns de mes tables, celle-ci se retrouve vide.
De plus, j'obtiens le message d'erreur suivant :

3251 : Le fournisseur ou l'objet ne prend pas en charge cette opération.

J'utilise également le provider OLE DB dans ma chaîne de connexion pour ouvrir ma base de données.

Merci pour votre attention.

[l_autodidacte]

Les lignes 9 et 10 sont incriminées :

Ligne 9 : For Each table In MyCat.Tables.Count car Table est un Objet auquel tu affectes un nombre (count)
Cela doit être : For Each table In MyCat.Tables.

Ligne 10 : Même remarque, cela doit être For Each Col In table.Columns

[V_inSe]

Les lignes 9 et 10 sont incriminées :

Ligne 9 : For Each table In MyCat.Tables.Count car Table est un Objet auquel tu affectes un nombre (count)
Cela doit être : For Each table In MyCat.Tables.

Ligne 10 : Même remarque, cela doit être For Each Col In table.Columns

En effet, petites erreurs de ma part.

Cependant, j'ai résolu mon problème en utilisant le fournisseur ODBC.

Merci pour l'attention.