VBS 调用access，表存在的判定　[金字塔]

帮你找到了一份文献

asp access 判断表是否存在
使用ConnectionObject.OpenSchema(20)可以得到RecordSet对象，RecordSet对象包含当前数据库中所有数据表的信息，要判断某名称的表是否存在，可以用循环匹配，如：
Dim Rs
Set Rs = Conn.OpenSchema(20)
Do While Not Rs.EOF
If Rs("Table_Name") = "TheTableName" Then
'找到表的操作。。
Else
'找不到表。。
End If
Rs.Close
Set Rs = Nothing
其中Conn.OpenSchema(20)中的参数20，是常量adSchemaTables的值，返回视图的类型是表和视图。MSDN原文：
Returns the tables (including views) defined in the catalog that are accessible to a given user.
还有别的许多其它的类型，有兴趣的朋友可以参考一下MSDN。
参考文献：
判断一个access数据库中某个表是否存在的方法 http://webdevelop.chinahtml.com/1/2006/asp-11407388513659.shtml