Primeiro chame a função openSchema no objeto adodb.connection, que obterá um Recordset, no qual cada “registro” corresponde a uma tabela do banco de dados, e cada “campo” do “registro” contém determinados aspectos da informação do tabela correspondente. O campo TABLE_NAME contém o nome da tabela correspondente
Esta função pode ser escrita como uma função. O processo de processamento da função é descrito a seguir:
Primeiro chame a função openSchema no objeto adodb.connection, que obterá um Recordset, no qual cada “registro” corresponde a uma tabela do banco de dados, e cada “campo” do “registro” contém determinados aspectos da informação do tabela correspondente. O campo TABLE_NAME contém o nome da tabela correspondente
Em seguida, percorra o Recordset. Se o valor do campo TABLE_NAME do "registro atual" for igual ao nome da tabela a ser pesquisada, isso prova que a tabela a ser pesquisada existe.
A função fica assim:
Copie o código do código da seguinte forma:
função check_gived_DataTable_exist_or_not(connect_object,name_of_gived_DataTable)
Do_gived_DataTable_exist=falso
Const adSchemaTables=20 'Indica que deseja obter a "coleção de tabelas (tabelas) e visualizações (visualizações)" no banco de dados
definir RecordSet_about_table_and_view_in_DataBase=connect_object.openSchema(adSchemaTables)
Faça até RecordSet_about_table_and_view_in_DataBase.EOF
se RecordSet_about_table_and_view_in_DataBase("TABLE_TYPE")="TABLE" então
se RecordSet_about_table_and_view_in_DataBase("TABLE_NAME")= nome_of_gived_DataTable então
Do_gived_DataTable_exist=true
sair, faça
terminar se
terminar se
RecordSet_about_table_and_view_in_DataBase.movenext
Laço
check_gived_DataTable_exist_or_not=Do_gived_DataTable_exist
função final
Observação:
Depois que a função connect_object.openSchema(adSchemaTables) for executada, você obterá "uma coleção de tabelas e visualizações no banco de dados", que são dados do tipo ADODB.Recordset.
if RecordSet_about_table_and_view_in_DataBase("TABLE_TYPE")="TABLE" restringe o escopo da verificação para "tabela".