Oppure

Loading
10/04/08 8:34
superchecco
Salve a tutti, qualcuno saprebbe dirmi se è possibile tramite un comando SQL ottenere un insieme di stringhe contente tutti i nomi di tutte le tabelle Access presenti in database???

sto diventando matto!
in pratica l'utente tramite un programma in vb crea nuove tabelle, decidendone anche il nome, quindi io non conosco ne il numero di tabelle presenti ne il nome!
aiutatemi please! :-|:-|
aaa
10/04/08 15:52
Il Totem
Ti copio un pezzo di sorgente del mio programma Totem Charting:
        Dim dbCon As OleDb.OleDbConnection
        Dim dbAdp As OleDb.OleDbDataAdapter
        Dim Data As New DataSet
        Dim SchemaTable As DataTable
        Dim Tables As New List(Of DataTable)

        dbCon = New OleDb.OleDbConnection("Provider=Microsoft.JET.OLEDB.4.0;Data Source=" & Database)
        'Apre la connessione
        dbCon.Open()

        'Ottiene tutte le tabelle
        SchemaTable = dbCon.GetOleDbSchemaTable(System.Data.OleDb.OleDbSchemaGuid.Tables, New Object() {Nothing, Nothing, Nothing, Nothing})

        'Le aggiunge alla collezione
        For I As Int16 = 0 To SchemaTable.Rows.Count - 1
            If SchemaTable.Rows(I).Item(3) = "TABLE" Then
                Dim Name As String
                Dim Table As DataTable
                Name = SchemaTable.Rows(I).Item(2)
                dbAdp = New OleDb.OleDbDataAdapter("SELECT * FROM `" & Name & "`", dbCon)
                'E tramite questo riempie il dataset
                dbAdp.Fill(Data)
                Table = Data.Tables(0)
                Table.TableName = Name
                Tables.Add(Table)
                Data.Dispose()
                Data = New DataSet
            End If
        Next
        'Chiude la connessione
        dbCon.Close()

        'Rilascia tutto
        Data.Clear()
        Data.Dispose()

P.S.: Name è il nome di ogni tabella.
Ultima modifica effettuata da Il Totem 10/04/08 15:53
aaa
11/04/08 15:42
superchecco
MERAVIGLIOSO!! :D
aaa