Connaitre les tables d'une base AccessRésolu

Question

Bonjour.

Quelqu'un pourrait-il me donner le code permettant de connaitre la liste des tables et requ&#234;tes contenues dans une base Acces ? Et y a-t-il un moyen de diff&#233;rencier les tables des requ&#234;tes ?

Merci d'avance pour votre aide.

cs_DARKSIDIOUS · Accepted Answer

Utilise ADOX pour lister la structure d'une base de donn&#233;es.



Pour les tables :

    Set m_oConnection = New ADODB.Connection

    Set m_oCatalog = New ADOX.Catalog

    Let m_oConnection.Mode = adModeUnknown

    Let m_oConnection.Provider = "Microsoft.Jet.OLEDB.4.0"

    Let m_oConnection.ConnectionString = sDataBaseName

    Call m_oConnection.Open

    Set m_oCatalog.ActiveConnection = m_oConnection



      'on &#233;num&#232;re chaque table de la base

      For Each oTable In m_oCatalog.Tables

        

          If oTable.Type = "TABLE" Then



                'il s'agit d'une table



            end if



        Next oTable

DarK Sidious

Un API Viewer (pour le VB, VB.NET, C, C# et Delphi) : www.ProgOtoP.com/popapi/

cs_pcvesoul · Answer

Merci mais j'ai un &#233;l&#233;ment type non d&#233;finit :  Set m_oCatalog = New ADOX.Catalog

Que dois-je rajouter comme r&#233;f&#233;rence ou composant ?

cs_DARKSIDIOUS · Answer

Il faut rajouter les r&#233;f&#233;rences &#224; ADODB et ADOX : 

Microsoft ActiveX Data Objects 
Microsoft ADO Ext.


DarK Sidious

Un API Viewer (pour le VB, VB.NET, C, C# et Delphi) : www.ProgOtoP.com/popapi/

cs_pcvesoul · Answer

Oui, j'ai trouvé finalement. Et ça fonctionne parfaitement.

Pour mémoire, les requêtes sont en type "VIEW".

Et je suppose qu'il faut faire "m_oConnection.Close" pour fermer la connection.

@+ et bonne continuation.

Connaitre les tables d'une base Access

4 réponses

Discussions similaires