检查access数据库中是否存在某个名字的表的asp代码

可以把本功能写成一个函数，函数的处理过程描述如下：

首先调用adodb.connection对象中的openschema函数，这样会得到一个recordset，其中每一条“纪录”对应着数据库中的一张表，“纪录”的每个“字段”包含了对应表的某方面信息。其中table_name字段包含了对应表的名称
然后遍历这个recordset，如果“当前纪录”的table_name字段的值和要查找的表的名字一样，证明要查找的表存在。
函数如下所示:

function check_gived_datatable_exist_or_not(connect_object,name_of_gived_datatable)
do_gived_datatable_exist=false
const adschematables=20 '表明想要得到数据库中“表（table）和视图（view）的集合”
set recordset_about_table_and_view_in_database=connect_object.openschema(adschematables)
do until recordset_about_table_and_view_in_database.eof
if recordset_about_table_and_view_in_database("table_type")="table" then
if recordset_about_table_and_view_in_database("table_name")= name_of_gived_datatable then
do_gived_datatable_exist=true
exit do
end if
end if
recordset_about_table_and_view_in_database.movenext
loop

check_gived_datatable_exist_or_not=do_gived_datatable_exist
end function

注释:

connect_object.openschema(adschematables)这个函数执行后，会得到“数据库中表（table）和视图（view）的集合”，这是一个adodb.recordset类型的数据。
if recordset_about_table_and_view_in_database("table_type")="table"这句话把检查范围缩小为“表（table）”。