Bonjour
depuis quelques temps, une BD access frontale ne s'ouvre plus en plein
écran. J'ai bien dit la fenêtre access et non pas seulement le formulaire
qui lui est plein écran dans la fenêtre access (.maximize).
Quel code placer pour forcer l'ouverture du MDB au plein écran. Cela est
particulièrement important dans une fonction externe et spécifique où j'ai
choisis de transférer le contrôle vers un second mdb frontal avec un
OpenDatabase genre .....
...
Set DB = acc.DBEngine.OpenDatabase(strDbName, False, False, ";PWD=" & PassW)
acc.OpenCurrentDatabase strDbName
DB.Close
Set DB = Nothing
...
merci
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Raymond [mvp]
Bonjour.
tu peux manipuler la fenêtre application par docmd, tu as des exemples sur: http://officesystem.access.free.fr/vba/accmdappmaximize.htm
-- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Ma Dalton" a écrit dans le message de news:
Bonjour depuis quelques temps, une BD access frontale ne s'ouvre plus en plein écran. J'ai bien dit la fenêtre access et non pas seulement le formulaire qui lui est plein écran dans la fenêtre access (.maximize).
Quel code placer pour forcer l'ouverture du MDB au plein écran. Cela est particulièrement important dans une fonction externe et spécifique où j'ai choisis de transférer le contrôle vers un second mdb frontal avec un OpenDatabase genre .....
... Set DB = acc.DBEngine.OpenDatabase(strDbName, False, False, ";PWD=" & PassW) acc.OpenCurrentDatabase strDbName DB.Close Set DB = Nothing ... merci
Bonjour.
tu peux manipuler la fenêtre application par docmd, tu as des exemples sur:
http://officesystem.access.free.fr/vba/accmdappmaximize.htm
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Ma Dalton" <Rantanplan@farwest.net> a écrit dans le message de news:
efoVHgz0EHA.1300@TK2MSFTNGP14.phx.gbl...
Bonjour
depuis quelques temps, une BD access frontale ne s'ouvre plus en plein
écran. J'ai bien dit la fenêtre access et non pas seulement le formulaire
qui lui est plein écran dans la fenêtre access (.maximize).
Quel code placer pour forcer l'ouverture du MDB au plein écran. Cela est
particulièrement important dans une fonction externe et spécifique où j'ai
choisis de transférer le contrôle vers un second mdb frontal avec un
OpenDatabase genre .....
...
Set DB = acc.DBEngine.OpenDatabase(strDbName, False, False, ";PWD=" &
PassW)
acc.OpenCurrentDatabase strDbName
DB.Close
Set DB = Nothing
...
merci
tu peux manipuler la fenêtre application par docmd, tu as des exemples sur: http://officesystem.access.free.fr/vba/accmdappmaximize.htm
-- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Ma Dalton" a écrit dans le message de news:
Bonjour depuis quelques temps, une BD access frontale ne s'ouvre plus en plein écran. J'ai bien dit la fenêtre access et non pas seulement le formulaire qui lui est plein écran dans la fenêtre access (.maximize).
Quel code placer pour forcer l'ouverture du MDB au plein écran. Cela est particulièrement important dans une fonction externe et spécifique où j'ai choisis de transférer le contrôle vers un second mdb frontal avec un OpenDatabase genre .....
... Set DB = acc.DBEngine.OpenDatabase(strDbName, False, False, ";PWD=" & PassW) acc.OpenCurrentDatabase strDbName DB.Close Set DB = Nothing ... merci
Pierre CFI [mvp]
bonjour mon petit raymond, fais gros dodo ? :o))
-- Pierre CFI MVP Microsoft Access Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer Access http://users.skynet.be/mpfa/ Excel http://www.excelabo.net Site perso http://access.cfi.free.fr "Raymond [mvp]" a écrit dans le message de news:
Bonjour.
tu peux manipuler la fenêtre application par docmd, tu as des exemples sur: http://officesystem.access.free.fr/vba/accmdappmaximize.htm
-- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Ma Dalton" a écrit dans le message de news:
Bonjour depuis quelques temps, une BD access frontale ne s'ouvre plus en plein écran. J'ai bien dit la fenêtre access et non pas seulement le formulaire qui lui est plein écran dans la fenêtre access (.maximize).
Quel code placer pour forcer l'ouverture du MDB au plein écran. Cela est particulièrement important dans une fonction externe et spécifique où j'ai choisis de transférer le contrôle vers un second mdb frontal avec un OpenDatabase genre .....
... Set DB = acc.DBEngine.OpenDatabase(strDbName, False, False, ";PWD=" & PassW) acc.OpenCurrentDatabase strDbName DB.Close Set DB = Nothing ... merci
bonjour mon petit raymond, fais gros dodo ? :o))
--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer
Access http://users.skynet.be/mpfa/
Excel http://www.excelabo.net
Site perso
http://access.cfi.free.fr
"Raymond [mvp]" <XYZ.officesystem.access@free.fr> a écrit dans le message de news:eDRM9340EHA.3448@TK2MSFTNGP09.phx.gbl...
Bonjour.
tu peux manipuler la fenêtre application par docmd, tu as des exemples sur:
http://officesystem.access.free.fr/vba/accmdappmaximize.htm
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Ma Dalton" <Rantanplan@farwest.net> a écrit dans le message de news:
efoVHgz0EHA.1300@TK2MSFTNGP14.phx.gbl...
Bonjour
depuis quelques temps, une BD access frontale ne s'ouvre plus en plein
écran. J'ai bien dit la fenêtre access et non pas seulement le formulaire
qui lui est plein écran dans la fenêtre access (.maximize).
Quel code placer pour forcer l'ouverture du MDB au plein écran. Cela est
particulièrement important dans une fonction externe et spécifique où j'ai
choisis de transférer le contrôle vers un second mdb frontal avec un
OpenDatabase genre .....
...
Set DB = acc.DBEngine.OpenDatabase(strDbName, False, False, ";PWD=" &
PassW)
acc.OpenCurrentDatabase strDbName
DB.Close
Set DB = Nothing
...
merci
-- Pierre CFI MVP Microsoft Access Mail : http://cerbermail.com/?z0SN8cN53B
Site pour bien commencer Access http://users.skynet.be/mpfa/ Excel http://www.excelabo.net Site perso http://access.cfi.free.fr "Raymond [mvp]" a écrit dans le message de news:
Bonjour.
tu peux manipuler la fenêtre application par docmd, tu as des exemples sur: http://officesystem.access.free.fr/vba/accmdappmaximize.htm
-- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Ma Dalton" a écrit dans le message de news:
Bonjour depuis quelques temps, une BD access frontale ne s'ouvre plus en plein écran. J'ai bien dit la fenêtre access et non pas seulement le formulaire qui lui est plein écran dans la fenêtre access (.maximize).
Quel code placer pour forcer l'ouverture du MDB au plein écran. Cela est particulièrement important dans une fonction externe et spécifique où j'ai choisis de transférer le contrôle vers un second mdb frontal avec un OpenDatabase genre .....
... Set DB = acc.DBEngine.OpenDatabase(strDbName, False, False, ";PWD=" & PassW) acc.OpenCurrentDatabase strDbName DB.Close Set DB = Nothing ... merci
Raymond [mvp]
Bonjour Pierre.
j'ai fait mon gros dodo jusqu'à ce matin 8h. Prêt pour une petite journée.
-- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Pierre CFI [mvp]" a écrit dans le message de news:
bonjour mon petit raymond, fais gros dodo ? :o))
-- Pierre CFI MVP Microsoft Access
Bonjour Pierre.
j'ai fait mon gros dodo jusqu'à ce matin 8h. Prêt pour une petite journée.
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Pierre CFI [mvp]" <XXX_pierresalaun@aol.com> a écrit dans le message de
news: uGLCH640EHA.2716@TK2MSFTNGP14.phx.gbl...
est-ce bon dans toute les versions access ou seulement dans 2003?
merci
"Raymond [mvp]" a écrit dans le message de news:
Bonjour.
tu peux manipuler la fenêtre application par docmd, tu as des exemples sur: http://officesystem.access.free.fr/vba/accmdappmaximize.htm
-- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Ma Dalton" a écrit dans le message de news:
Bonjour depuis quelques temps, une BD access frontale ne s'ouvre plus en plein écran. J'ai bien dit la fenêtre access et non pas seulement le formulaire qui lui est plein écran dans la fenêtre access (.maximize).
Quel code placer pour forcer l'ouverture du MDB au plein écran. Cela est particulièrement important dans une fonction externe et spécifique où j'ai choisis de transférer le contrôle vers un second mdb frontal avec un OpenDatabase genre .....
... Set DB = acc.DBEngine.OpenDatabase(strDbName, False, False, ";PWD=" & PassW) acc.OpenCurrentDatabase strDbName DB.Close Set DB = Nothing ... merci
est-ce bon dans toute les versions access ou seulement dans 2003?
merci
"Raymond [mvp]" <XYZ.officesystem.access@free.fr> a écrit dans le message de
news: eDRM9340EHA.3448@TK2MSFTNGP09.phx.gbl...
Bonjour.
tu peux manipuler la fenêtre application par docmd, tu as des exemples
sur:
http://officesystem.access.free.fr/vba/accmdappmaximize.htm
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Ma Dalton" <Rantanplan@farwest.net> a écrit dans le message de news:
efoVHgz0EHA.1300@TK2MSFTNGP14.phx.gbl...
Bonjour
depuis quelques temps, une BD access frontale ne s'ouvre plus en plein
écran. J'ai bien dit la fenêtre access et non pas seulement le formulaire
qui lui est plein écran dans la fenêtre access (.maximize).
Quel code placer pour forcer l'ouverture du MDB au plein écran. Cela est
particulièrement important dans une fonction externe et spécifique où
j'ai
choisis de transférer le contrôle vers un second mdb frontal avec un
OpenDatabase genre .....
...
Set DB = acc.DBEngine.OpenDatabase(strDbName, False, False, ";PWD=" &
PassW)
acc.OpenCurrentDatabase strDbName
DB.Close
Set DB = Nothing
...
merci
est-ce bon dans toute les versions access ou seulement dans 2003?
merci
"Raymond [mvp]" a écrit dans le message de news:
Bonjour.
tu peux manipuler la fenêtre application par docmd, tu as des exemples sur: http://officesystem.access.free.fr/vba/accmdappmaximize.htm
-- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Ma Dalton" a écrit dans le message de news:
Bonjour depuis quelques temps, une BD access frontale ne s'ouvre plus en plein écran. J'ai bien dit la fenêtre access et non pas seulement le formulaire qui lui est plein écran dans la fenêtre access (.maximize).
Quel code placer pour forcer l'ouverture du MDB au plein écran. Cela est particulièrement important dans une fonction externe et spécifique où j'ai choisis de transférer le contrôle vers un second mdb frontal avec un OpenDatabase genre .....
... Set DB = acc.DBEngine.OpenDatabase(strDbName, False, False, ";PWD=" & PassW) acc.OpenCurrentDatabase strDbName DB.Close Set DB = Nothing ... merci
Raymond [mvp]
A partir de 2000, c'est supporté, sûr. 97 je ne me rappelle plus. en as-tu un sous la main ?
-- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
est-ce bon dans toute les versions access ou seulement dans 2003?
merci
Ma Dalton
En 2000, il se passe effectivement qq chose mais pas ce à quoi je m'attendais (oui j'ai aussi 97 mais seulement pour dépanner, 2k est notre minimum pour les nouvelles bases).
ma procédure est la suivante:
dans une base frontale, sur clic d'un bouton de formulaire je fais un : 'validationData.mdb est une 2eme base frontale conçu par un collègue 'qui interragit dans un projet commun Call OpenPasswordProtectedDB("ValidationData.mdb")
et dans un module j'ai la fonction: Sub OpenPasswordProtectedDB(NameBD As String)
'Définit la valeur Static de façon à ce que l'instance de Microsoft Access 'ne se ferme pas lorsque la procédure est terminée. Static acc As Access.Application Dim db As DAO.Database Dim strDbName As String strDbName = RepData & "" & NameBD 'RepData est une constante Set acc = New Access.Application acc.Visible = True Set db = acc.DBEngine.OpenDatabase(strDbName, False, False, ";PWD=" & PassW) acc.OpenCurrentDatabase strDbName '***j'ai mis le code ici mais sans succès !!!*** 'DoCmd.RunCommand acCmdAppMaximize db.Close Set db = Nothing End Sub
Y a t-il une place précise pour placer le 'DoCmd.RunCommand acCmdAppMaximize
merci
"Raymond [mvp]" a écrit dans le message news:
A partir de 2000, c'est supporté, sûr. 97 je ne me rappelle plus. en as-tu un sous la main ?
-- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
est-ce bon dans toute les versions access ou seulement dans 2003?
merci
En 2000, il se passe effectivement qq chose mais pas ce à quoi je
m'attendais (oui j'ai aussi 97 mais seulement pour dépanner, 2k est notre
minimum pour les nouvelles bases).
ma procédure est la suivante:
dans une base frontale, sur clic d'un bouton de formulaire je fais un :
'validationData.mdb est une 2eme base frontale conçu par un collègue
'qui interragit dans un projet commun
Call OpenPasswordProtectedDB("ValidationData.mdb")
et dans un module j'ai la fonction:
Sub OpenPasswordProtectedDB(NameBD As String)
'Définit la valeur Static de façon à ce que l'instance de Microsoft
Access
'ne se ferme pas lorsque la procédure est terminée.
Static acc As Access.Application
Dim db As DAO.Database
Dim strDbName As String
strDbName = RepData & "" & NameBD 'RepData est une constante
Set acc = New Access.Application
acc.Visible = True
Set db = acc.DBEngine.OpenDatabase(strDbName, False, False, ";PWD=" &
PassW)
acc.OpenCurrentDatabase strDbName
'***j'ai mis le code ici mais sans succès !!!***
'DoCmd.RunCommand acCmdAppMaximize
db.Close
Set db = Nothing
End Sub
Y a t-il une place précise pour placer le
'DoCmd.RunCommand acCmdAppMaximize
merci
"Raymond [mvp]" <XYZ.officesystem.access@free.fr> a écrit dans le message
news: uaDvRr70EHA.3324@tk2msftngp13.phx.gbl...
A partir de 2000, c'est supporté, sûr.
97 je ne me rappelle plus. en as-tu un sous la main ?
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Ma Dalton" <rantanplan@farwest.net> a écrit dans le message de news:
OrYken70EHA.3840@tk2msftngp13.phx.gbl...
En 2000, il se passe effectivement qq chose mais pas ce à quoi je m'attendais (oui j'ai aussi 97 mais seulement pour dépanner, 2k est notre minimum pour les nouvelles bases).
ma procédure est la suivante:
dans une base frontale, sur clic d'un bouton de formulaire je fais un : 'validationData.mdb est une 2eme base frontale conçu par un collègue 'qui interragit dans un projet commun Call OpenPasswordProtectedDB("ValidationData.mdb")
et dans un module j'ai la fonction: Sub OpenPasswordProtectedDB(NameBD As String)
'Définit la valeur Static de façon à ce que l'instance de Microsoft Access 'ne se ferme pas lorsque la procédure est terminée. Static acc As Access.Application Dim db As DAO.Database Dim strDbName As String strDbName = RepData & "" & NameBD 'RepData est une constante Set acc = New Access.Application acc.Visible = True Set db = acc.DBEngine.OpenDatabase(strDbName, False, False, ";PWD=" & PassW) acc.OpenCurrentDatabase strDbName '***j'ai mis le code ici mais sans succès !!!*** 'DoCmd.RunCommand acCmdAppMaximize db.Close Set db = Nothing End Sub
Y a t-il une place précise pour placer le 'DoCmd.RunCommand acCmdAppMaximize
merci
"Raymond [mvp]" a écrit dans le message news:
A partir de 2000, c'est supporté, sûr. 97 je ne me rappelle plus. en as-tu un sous la main ?
-- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
