请教:access中表的问题

Question

vb开发的程序如何在启动运行的时候检查access是否存在一个特定的表?

Answer 1

ACCESS中有一个系统表用来存放数据库中所有表信息，你可以看看这个表，表名我不记得了，你可以ACCESS中的［工具］中［选项］中找到［系统表］请可以看到了。

Answer 2

select [name] from msysobjects where [name]=你要查的表名

Answer 3

Dim db As DatabaseSet db = OpenDatabase(a.mdb)
For i = 1 To db.TableDefs.Count
    Debug.Print db.TableDefs(i).Name
next i

Answer 4

victorycyz: 我看不大懂啊,我把问题说得具体点吧,我vb开发的程序要在启动的时候先判断一下数据库A.mdb是否存在表"table1",如果存在,做处理1,如果不存在,做处理2.victorycyz 你能不能把代码写清楚一点,谢谢!

Answer 5

Dim MyCon As New ADODB.Connection
Dim MyRes As New ADODB.Recordset
MyCon.Open Con_Str & Path‘连接字符串
Set MyRes = MyCon.OpenSchema(adSchemaTables, Array(Empty, Empty, Empty, "TABLE"))
Do Until MyRes.EOF
         Cbo.AddItem (MyRes!Table_Name)’在下拉框中显示所有表名
         MyRes.MoveNext
Loop
MyRes.Close
MyCon.Close

Answer 6

cqq_chen(我是谁)  方法可行,程序已经通过. raul1122(小贝) 没试过. 多谢各位!