kwhwind 2014-12-05 10:58 采纳率: 100%
浏览 3511
已采纳

vba 连接access数据库,rst.open那句出现问题,提示至少一个参数没有被指定值

Private Sub Command6_Click()

Dim conn As ADODB.Connection
Set conn = New ADODB.Connection
conn.ConnectionString = "Provider=microsoft.ace.oledb.12.0;persist security info=false;data source=f:\login.accdb;"
conn.Open

Dim rst As ADODB.Recordset
Set rst = New ADODB.Recordset

rst.Open "select * from login where name=' " & username.Value & " '", CurrentProject.Connection  

End Sub

username是窗体中文本框控件的名字。

求高手解答,非常感谢!

  • 写回答

3条回答 默认 最新

  • save4me 2014-12-05 11:14
    关注

    CurrentProject.Connection 和conn是什么关系?你前面打开了conn,为什么rst.open不直接用conn

    本回答被题主选为最佳回答 , 对您是否有帮助呢?
    评论
查看更多回答(2条)

报告相同问题?