Hallo zusammen,

ich suche eine Funktion mit der ich eine Access DB nach Tabellenname durchsuchen kann. Als Rückgabewert sollte sie entweder einen boolean-Wert haben, wenn ich einen Namen übergebe, oder eine Liste von allen vorhanden Namen.

Gibt es so etwas?

Das gleiche suche ich für Abfragen....

Hintergrund:
Wenn ich eine Abfrage mehr als einmal mit VBasic unter den gleichen Namen speichern möchte, erhalte ich die Meldung, dass die Abfrage bereits existiert. Ich benötige demnach eine Information über den Zustand meiner Abfrage (vorhanden/nicht vorhanden). Habe ich diese Information, kann ich entsprechend reagieren. Ohne Info - keine Reaktion

Grüße
Micha

Hallo, hier ein Beispiel für Tabellen und Abfragen.

Code :

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36

' Verweis auf Microsoft ActiveX Data Objects 2.x Library nicht vergessen !   Private Sub Form_Load() Dim DB As ADODB.Connection Dim RS As ADODB.Recordset     Set DB = New ADODB.Connection     DB.CursorLocation = adUseClient   DB.Provider = "Microsoft.Jet.OLEDB.4.0"   DB.Open "D:\db1.mdb"     Set RS = New ADODB.Recordset     Set RS = DB.OpenSchema(adSchemaTables)     Do Until RS.EOF       ' Tabelle auslesen     If RS("TABLE_TYPE") = "TABLE" Then         List1.AddItem RS("TABLE_NAME")     End If         ' Abfragen auslesen     If RS("TABLE_TYPE") = "VIEW" Then         List2.AddItem RS("TABLE_NAME")     End If         RS.MoveNext     Loop   RS.Close DB.Close   End Sub