.net lista tabelle database

[amodio]

salve a tutti

devo caricare una combobox con tutte le tabelle di un database
come posso fare?

ho questo codice ma proprio nn ne vuole sapere
dice adschematables non supportato
come posso fare?

 
  Cnxn.Open("Provider=VFPOLEDB.1;Data Source=D:\VALVES\OKEYWIN\Data\200\okdb_ditta.dbc;Password="";Collating Sequence=MACHINE")
        rstSchema = Cnxn.OpenSchema(adSchemaTables)

        Do Until rstSchema.EOF
            CBB.Items.Add(rstSchema("TABLE_NAME"))
            rstSchema.MoveNext()
        Loop

grazie

[mardok30]

In VB6 faccio:
dim I as integer
for I=0 to data1.database.tabledefs.count = -1
print data1.database.tabledefs(I).name
next I
Non so se funziona lo stesso con .net, prova...
CIAO