vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
SEPA-Dateien erstellen inkl. IBAN-, BLZ-/Kontonummernprüfung  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2024
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

VB.NET - Ein- und Umsteiger
Re: Dringend: Tabellen aus accdb ermitteln (ADO) 
Autor: Tommi467
Datum: 27.02.19 15:49

Ich hab da jetzt doch noch etwas gefunden was zu funktionieren scheint...


        Dim oConn As New ADODB.Connection
        Dim oRs As New ADODB.Recordset
 
        oConn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data" & _
          "Source=" & Dateiname & ";"
 
        oConn.Open()
 
        With oConn
            oRs = .OpenSchema(ADODB.SchemaEnum.adSchemaTables)
            Do Until oRs.EOF
                If oRs("TABLE_TYPE").Value = "TABLE" Then
                    ListBox1.Items.Add(oRs("TABLE_NAME").Value)
                End If
                oRs.MoveNext()
            Loop
        End With
 
        oRs.Close()
        oConn.Close()
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Dringend: Tabellen aus accdb ermitteln (ADO)619Tommi46727.02.19 15:36
Re: Dringend: Tabellen aus accdb ermitteln (ADO)298Tommi46727.02.19 15:49

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2024 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel