！！！我想确定数据库有没有某张表该怎么写？

richardwei

     Dim TempCheck As Recordset

    Set TempCheck = dbs.OpenRecordset("select * from db")



    If TempCheck = 0 Then

        MsgBox ("No such db!!!")

    else

        MsgBox ("Have such db!!!")

    End If

是不是这样写啊？哪里写错了？请指点一下谢谢~

richardwei

UP一个~谁来帮忙啊~

怎么没有人啊~~~~

[此贴子已经被作者于2005-10-30 11:26:25编辑过]

richardwei

    Dim TempRs As Recordset

    Set TempRs = dbs.OpenRecordset("Select * from msysobjects where name = [" + tempDB + "]")

我这样写的话查询到和没查询到TempRs的值各是什么？