超菜,一个关于连接ACCESS的问题!

Question

运行时报错说:FROM 子句语法错误!
代码如下:
(已引用工程 ADO 2.6)Dim com As Command
Dim con As Connection
Dim rst As RecordsetPrivate Sub Command1_Click()
    Text1.Text = rst!UserID
    Text2.Text = rst!UserPassword
End SubPrivate Sub Form_Load()
    Set com = New Command
    Set con = New Connection
    Set rst = New Recordset
    With con
        .ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Documents and Settings\dnvihc\My Documents\VBTest.mdb;Persist Security Info=False"
        .Open
    End With
    com.ActiveConnection = con
    rst.Open "select * from User", con, adOpenDynamic, adLockOptimistic
End Sub

Answer 1

select * from User改为
select * from [User]

Answer 2

或者将数据库中的User表改一个另外的名字。

Answer 3

rst.Open "select * from [User]", con, adOpenDynamic, adLockOptimistic

Answer 4

更改User表的名称，不能用的关键字还有value, group等等