如何写这样的代码，即连接数据库后判断有无我所需的数据表，如无则给出提示?

如何写这样的代码，即连接数据库后判断有无我所需的数据表，如无则给出提示?

解决方案 »

  1.   

    rs.open "select 1 from sysobjects where name='company'",cn
    if rs.eof then
     msgbox "company表不存在"
    else
     msgbox "company表存在"
    end if
      

  2.   

    三种方法：1.通过错误处理,在程序中直接用SQL语句访问你需要的表,如果错误,根据错误号判断是否是表不存在的错误,然后处理2.从系统表中读取,这会根据不同的数据库,系统表的名称不一样!!SYBASE 和SQL SERVER 的系统表中SYSOBJECTS3.利用ADO进行读取数据库中所有表的操作(这比较麻烦)建议用第一种,比较简洁!!