Открытие MS Access 2003 .mdb в коде VB6

Question

Я пытаюсь открыть файл доступа .mdb Access в MS Access 2003 с использованием кода VB6, чтобы открыть отчет в этом доступе.

Редактировать: Я пробовал несколько вещей и теперь узнал, что мы используем ULS (уровень безопасности пользователей) для доступа к нашим базам данных с Access в компании. Проблема в том, что OpenCurrentDatabase, похоже, не поддерживает это. Я нашел сообщение, в котором рассказывал мне сначала создать рабочую область, а затем открыть базу данных из этой рабочей области, но это не сработает. новый код Ive пытался ниже: Мой код:

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: Ms Basic 6.0
• Библиотека Видео: Доступ 10,0 Библиотека Microsoft Object.

Приведенный выше код заставляет MS Access запускать, но затем блокирует и ничего не делает.

Answer 1

Правильный синтаксис для открытия отчета:

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

... для закрытия отчета:

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