我用access 给数据库加上密码后
.......
Set Rw1 = CreateWorkspace("", "admin", "123")
Set Rs1 = Rw1.OpenDatabase(App.Path + "\main.mdb")
Set Rc1 = Rs1.OpenRecordset("select * from 操作员表")
错误内容:不能启动应用程序.工作组信息文件丢失,或者被其他用户以独占方式打开此数据库没有设置密码的时候可以打开:
Set Rw1 = CreateWorkspace("", "admin", "")
Set Rs1 = Rw1.OpenDatabase(App.Path + "\main.mdb")
Set Rc1 = Rs1.OpenRecordset("select * from 操作员表")