Rufen Sie zunächst die openSchema-Funktion im adodb.connection-Objekt auf, die ein Recordset erhält, in dem jeder Datensatz einer Tabelle in der Datenbank entspricht und jedes Feld des Datensatzes einen Aspekt der Informationen der entsprechenden Tabelle enthält. Das Feld TABLE_NAME enthält den Namen der entsprechenden Tabelle. Diese Funktion kann als Funktion geschrieben werden. Der Verarbeitungsprozess der Funktion wird wie folgt beschrieben:
Rufen Sie zunächst die openSchema-Funktion im adodb.connection-Objekt auf, die ein Recordset erhält, in dem jeder Datensatz einer Tabelle in der Datenbank entspricht und jedes Feld des Datensatzes einen Aspekt der Informationen der entsprechenden Tabelle enthält. Das Feld TABLE_NAME enthält den Namen der entsprechenden Tabelle
Durchlaufen Sie dann dieses Recordset. Wenn der Wert des Felds TABLE_NAME des aktuellen Datensatzes mit dem Namen der zu durchsuchenden Tabelle übereinstimmt, beweist dies, dass die zu durchsuchende Tabelle vorhanden ist.
Die Funktion sieht so aus:
Kopieren Sie den Codecode wie folgt:
Funktion check_gaved_DataTable_exist_or_not(connect_object,name_of_gaved_DataTable)
Do_gaved_DataTable_exist=false
Const adSchemaTables=20 'Gibt an, dass Sie die Sammlung von Tabellen und Ansichten in der Datenbank abrufen möchten
set RecordSet_about_table_and_view_in_DataBase=connect_object.openSchema(adSchemaTables)
Tun bis RecordSet_about_table_and_view_in_DataBase.EOF
wenn RecordSet_about_table_and_view_in_DataBase(TABLE_TYPE)=TABLE dann
wenn RecordSet_about_table_and_view_in_DataBase(TABLE_NAME)= name_of_gived_DataTable dann
Do_gaved_DataTable_exist=true
beenden tun
Ende wenn
Ende wenn
RecordSet_about_table_and_view_in_DataBase.movenext
Schleife
check_gived_DataTable_exist_or_not=Do_gived_DataTable_exist
Endfunktion
Notiz:
Nachdem die Funktion connect_object.openSchema(adSchemaTables) ausgeführt wurde, wird eine Sammlung von Tabellen und Ansichten in der Datenbank abgerufen, bei denen es sich um Daten vom Typ ADODB.Recordset handelt.
Der Satz if RecordSet_about_table_and_view_in_DataBase(TABLE_TYPE)=TABLE schränkt den Umfang der Prüfung auf die Tabelle ein.