Question

我尝试使用VB6代码在MS Access 2003中打开.mdb访问文件，以便在该访问权限内打开报告。

编辑：我尝试了一些事情，现在发现我们使用ULS（用户级安全性）通过公司的Access访问我们的数据库。问题是OpenCurrentDatabase似乎不支持这一点。我找到一个帖子告诉我先创建一个工作区，然后从该工作区内打开数据库，但这不起作用。我试过的新代码如下：我的代码：

Private Sub Command1_Click()
     us = "xxxx"
     pw = "xxxx"
     Set acc = New Access.Application
     Set ws = acc.DBEngine.CreateWorkspace("test1", us, pw)
End Sub

现在我需要以某种方式从该工作空间中打开该访问数据库，以便ULS可以使用它。有任何想法吗？相关系统信息：

MS Access版本：2003
操作系统：Windows 7 64位SP6
VB IDE：Visual Basic 6.0女士
库：Microsoft Access 10.0对象库。

上面的代码导致MS Access启动但随后发生死锁并且没有做任何事情。

Answer 1

正确打开报告的语法：

acc.Application.DoCmd.OpenReport "Bericht1", acViewNormal

...关闭报告：

acc.Application.DoCmd.Close acReport, "Bericht1"

在VB6代码中打开MS Access 2003 .mdb

1 个答案: