Таблицы БД и Odbc

[Lilas]

Здравствуйте! Мне надо реализовать подключение к различным типам БД (Access, таблицы Excel, dbf и т.д.) Подключаюсь через odbc драйвера. Но я не могу знать заранее имена таблиц, которые есть в БД, чтобы сделать оттуда выборку всех полей. Вот код подключения к БД. Подскажите как можно считать из БД список всех доступных в ней таблиц.
Dim ProviderName As String = "Microsoft.Jet.OLEDB.4.0"
Dim strAccessConn As String = "Provider=" & ProviderName & ";Data Source=" & FileName
Dim strAccessSelect As String = "SELECT * FROM Годовой_баланс_за_1999"
Dim myAccessConn As OleDbConnection = New OleDbConnection(strAccessConn)
Dim myAccessCommand As OleDbCommand = New OleDbCommand(strAccessSelect, myAccessConn)
Dim myDataAdapter As OleDbDataAdapter = New OleDbDataAdapter(myAccessCommand)
myAccessConn.Open()
Dim myDataSet As DataSet = New DataSet
myDataSet.Tables.Add("chet")
Try
myDataAdapter.Fill(myDataSet, "Categories")
Finally
myAccessConn.Close()
End Try
Try
Dim dta As DataTableCollection = myDataSet.Tables
For Each dt As DataTable In dta
Console.WriteLine("Found data table {0}", dt.TableName)
Next
Catch ex As Exception
Console.WriteLine("Oooops. Caught an exception:\n{0}", ex.Message)
End Try

[Sebas]

В ADO.NET Только в версии 2, либо специфическим запросом. для каждой базы свой или вообще, может не быть(((