^ true...

vb Code:
  1. Dim SchemaTable As DataTable = conn.GetOleDbSchemaTable(System.Data.OleDb.OleDbSchemaGuid.Tables, New Object() {Nothing, Nothing, Nothing, Nothing})
  2.  
  3.  
  4.  
  5.             Dim int As Integer
  6.  
  7.             For int = 0 To SchemaTable.Rows.Count - 1
  8.  
  9.                 If SchemaTable.Rows(int)!TABLE_TYPE.ToString = "TABLE" Then
  10.  
  11.                     'Add items to list box
  12.  
  13.                     ListBox1.Items.Add(SchemaTable.Rows(int)!TABLE_NAME.ToString())
  14.  
  15.                 End If
  16.  
  17.             Next

That should get you going : ).

Justin