Office中国论坛/Access中国论坛

标题: ！！！我想确定数据库有没有某张表该怎么写？ [打印本页]

作者: richardwei 时间: 2005-10-30 18:34
标题: ！！！我想确定数据库有没有某张表该怎么写？
   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 时间: 2005-10-30 19:10
UP一个~谁来帮忙啊~

怎么没有人啊~~~~

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

作者: richardwei 时间: 2005-10-30 19:49
Dim TempRs As Recordset

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

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

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)