我想查找 表1 是否在数据库db1.mdb存在,但不知道该如何检测,还请各位大侠帮忙。

解决方案 »

  1.   

    可以执行一条select * from 表1 语句,在确认连接正确的情况下出错的话,就说明这个表1不存在了.
      

  2.   

    去翻一下SQL的书吧!数据是有系统表的!系统表就保存表名和字段等一些的!
      

  3.   

    Select * From 表1
    如果出错就说名表1不存在。
    前提连接db1.mdb数据库。
      

  4.   

    '----------------------------------------------------------------------------
    '
    'Author:lihonggen0
    'Date:2003-6-19
    '功能:获取access库中表的个数及表的名称
    '用ado怎样实现
    '工程--->引用--->Microsoft ActiveX Data Object 2.x(版本号)
    '----------------------------------------------------------------------------
    Private Sub Form_Load()
    Dim adoCN   As New ADODB.Connection                '定义数据库的连接
    Dim strCnn   As New ADODB.Recordset
    Dim I As Integer
       str1 = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\Northwind.MDB;Persist Security Info=False"
       adoCN.Open str1
             
       Set rstSchema = adoCN.OpenSchema(adSchemaTables)
         
      

  5.   

    Do Until rstSchema.EOF
            If rstSchema!TABLE_TYPE = "TABLE" Then
               out = out & "Table  name:  " & _
                   rstSchema!TABLE_NAME & vbCr & _
                   "Table  type:  " & rstSchema!TABLE_TYPE & vbCr
                I = I + 1
            End If
            rstSchema.MoveNext
       Loop
       MsgBox I
       rstSchema.Close
         
       adoCN.Close
    Debug.Print out
    End Sub