我把数据库的密码设置为123456,把下面这段代码加在我程序的第一个FORM的LOAD事件中,但运行到最后一句就提示"错误的参数号或无效的属性赋值",这是什么意思啊.我命令也没有错误啊.expression.OpenCurrentDatabase(filepath, Exclusive, bstrPassword)
Dim con As Object
Dim co As String
Set con = CreateObject("Access.Application")
co = CurrentProject.Path & "\thread_db.mdb"
con.OpenCurrentDatabase co, , "123456"