Bonjour,
Afin de rendre mon application "plus professionnelle" j'ai rendu non visible l'interface ACCESS non visible et activé uniquement les formulaires de mon application. Ainsi, un utilisateur de mon application peut ne pas se rendre compte qu'il travaille en fait sur une base de données.
Tout marche bien sauf pour l'édition d'état avec la fonction openreport qui ne s'ouvre plus car elle est attachée à ACCESS. Pour voir le report je suis donc obligé d'activé ACCESS puis lorsque l'utilisateur ferme le report je "referme" aussi ACCESS. Cela est une rustine car pas très beau !
Voila le code pour "cacher" ACCESS mais pas mon formulaire de démarrage :
Avez-vous une autre idée que l'API ShowWindow ?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13 'Cache le logiciel ACCESS Call ShowWindow(Application.hWndAccessApp, 0) 'SW_HIDE Call ShowWindow(Application.hWndAccessApp, 7) 'SW_SHOWMINNOACTIVE 'Ouvre le formulaire de démarrage Call ShowWindow(Me.hWnd, 1) 'SW_SHOWNORMAL Voila le code pour ouvrir mon report (état d'édition) Set mobjReport = New Report_Fiche ' Fiche est un état créé dans ACCESS Call ShowWindow(Application.hWndAccessApp, 3) 'SW_SHOW Call ShowWindow(mobjReport.hWnd, 3) 'SW_MAXIMIZE mobjReport.Visible = True
Partager