在VB中调用access数据库时出现错误
Dim Conn As New ADODB.Connection
Dim Rs As New ADODB.Recordset
Conn.ConnectionString= "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\备件管理系统\equipmentDB.mdb;Persist Security Info=False"
Conn.Open()
strACC = "select * from user where User='&UserName&'"
Rs.Open(strACC, Conn, 1, 1) '运行到此出错