ADO要如何判断一个表是否存在？

Question

如题，写一个函数
BOOL IsFormExist(LPCTSTR lpszFormName);

Answer 1

Catalog 对象
            包含描述数据源模式目录的集合（Tables、Views、Users、Groups 和 Procedures）。
说明可以通过添加或删除对象、或修改现有的对象来修改 Catalog 对象。有些提供者可能不支持所有 Catalog 对象，或可能只支持查看模式信息。使用 Catalog 对象的属性和方法，可以： 通过将 ActiveConnection 属性设置为 ADO Connection 对象或有效的连接字符串来打开目录。
使用 Create 方法创建新目录。
使用 GetObjectOwner 和 SetObjectOwner 方法确定 Catalog 中对象的所有者。 Tables 集合
         包含目录的所有 Table 对象。
说明Tables 集合的 Append 方法对于 ADOX 是唯一的。可以： 使用 Append 方法将新表添加到集合中。 
其余的属性和方法对于 ADO 集合是标准的。可以： 使用 Item 方法访问集合中的表。
使用 Count 属性返回包含在集合中的表的数目。
使用 Delete 方法从集合中删除表。
使用 Refresh 方法更新集合中的对象，以反映当前数据库的模式。 Table 对象
            表示包括列、索引和关键字的数据库表。
说明如下代码创建新的 Table：Dim obj As New Table使用 Table 对象的属性和集合，可以： 使用 Name 属性标识表。
使用 Type 属性确定表的类型。
使用 Columns 集合访问表的数据库列。
使用 Indexes 集合访问表的索引。
使用 Keys 集合访问表的关键字。
使用 ParentCatalog 属性指定拥有表的 Catalog。
使用 DateCreated 和 DateModified 属性返回日期信息。
使用 Properties 集合访问特定提供者的表属性。 创建表范例 
如下代码演示如何创建新表。Sub CreateTable()   Dim tbl As New Table
   Dim cat As New ADOX.Catalog'打开目录。
   ' 打开目录。
   cat.ActiveConnection = _ 
      "Provider=Microsoft.Jet.OLEDB.4.0;" & _
      "Data Source=c:\Program Files\Microsoft Office\" & _
      "Office\Samples\Northwind.mdb;"   tbl.Name = "MyTable"
   tbl.Columns.Append "Column1", adInteger
   tbl.Columns.Append "Column2", adInteger
   tbl.Columns.Append "Column3", adVarWChar, 50
   cat.Tables.Append tblEnd Sub

Answer 2

一楼写的是vb啊！
你可以这样来处理
try
{
  select * from 表名字
}
catch（_com_error &e)
{
//说明表不存在
}

Answer 3

还有个办法如果是sql server的话、
select name from sysobjects where name='你要查找的表'
如果返回的记录不为空那么就存在，反之你明白了

Answer 4

同意
select name from sysobjects where name='你要查找的表'

Answer 5

select name from sysobjects where name='你要查找的表'
这个方法不错.

Answer 6

declare
   i number;
begin
   select count(*) into i from all_tables a where a.table_name ='你要的表名' ;
   if i=0 then 
      --在这里用动态sql执行创建表的动作
   else
      select * from 你名字你的表名.....
      --在这里进行查询
   end if;
end;