Отчеты о доступе не отображаются - PullRequest
0 голосов
/ 13 декабря 2018

У меня проблема с моими формами доступа.Я скрываю базу данных доступа пользователям с этим кодом.

Const SW_HIDE = 0
 Const SW_NORMAL = 1

 Private Declare Function ShowWindow Lib "user32" _
     (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long

 In der Öffnen-Sub deines Übersichtsformulares:

Dim hWindow As Long
 Dim nResult As Long
 Dim nCmdShow As Long
 hWindow = Application.hWndAccessApp
 nCmdShow = SW_HIDE
 nResult = ShowWindow(ByVal hWindow, ByVal nCmdShow)
 Call ShowWindow(Me.hWnd, SW_NORMAL)  

Но затем я пытаюсь открыть отчеты через форму, они не открываются.Я не знаю почему

1 Ответ

0 голосов
/ 13 декабря 2018

Я никогда не использовал этот код, но, похоже, причина вашей проблемы описана здесь, в главе 1.11: http://www.donkarl.com/FAQ/FAQ1Grundlagen.htm

(В этой статье также есть ссылка на статью Microsoft, но, к сожалению,также не на английском)

Alle Formulare deiner Anwendung müssen auf Pop-Up eingestellt sein, weil sie sonst im nicht mehr sichtbaren Access-Fenster dargestellt werden und daher selber nicht mehr sichtbar.Beim Öffnen von Berichten в Seitenansicht muss man die (PopUP-) Formulare alle auf unsichtbar setzen oder schließen.

На английском языке:

Все формывашего приложения должны быть установлены во всплывающих окнах, так как в противном случае они будут отображаться в окне доступа, которое больше не отображается и, следовательно, больше не отображается само по себе. При открытии отчетов в режиме просмотра страниц необходимо настроить все (PopUP-) формы на невидимые или закрыть их.

Вы можете попробовать.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...