Je n'arrive pas à trouver la solution ni dans l'aide d'access ni dans les archives. Il est fort probable que j'utilise les mauvais mot clefs
Dans une appli access, je lance une nouvelle instance d'access
Au niveau du module : Dim appAccess as objec
function tit
'execute l'applicatio
Set appAccess = CreateObject("Access.Application.8"
..
end functio
Je fais diverses opérations sur cette nouvelle instance.
Et je termine en voulant fermer l'instance initiale tout en laissant la derniére active
function fermeture (
'rend visible la nouvelle bas
appAccess.Visible = Tru
'quitte la base de mise à jou
Application.Quit acSaveYe
end functio
Or cela ne marche pas, les 2 applis access sont fermées
Ce que je ne comprends, c'est le fait que c'est un simple copier/coller d'une base que j'ai deja créé dont la différence est le changement de la base cible pour la nouvelle instanc
Dans cette base si je fais set appAccess = Nothing cela ferme la nouvelle instance. Or si je met ce bout de code dans l'appli initiale rien ne se passe
Il doit y a avoir une astuce toute bete mais je ne la trouve pas
Auriez vous une idée ? merc
j
qui se pose des questions sur la propreté de son code
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 joyeux atchoum.
Or cela ne marche pas, les 2 applis Access sont fermées.
cette situation me parait logique car ta 2eme instance est un objet application de ta 1ere instance. Lorsque tu quittes la 1ere, l'objet appAccess est fermé (nothing) et ta 2e ne peut plus tourner donc elle quitte aussi. ceci dit en termes simples et en raccourci. si tu veux que tes 2 applis soient concurrentes il faudrait lancer la 2e par le Shell mais tu n'auras plus l'automation. c'était une idée. -- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"joyeux atchoum" a écrit dans le message de news:
Bonjour
Je n'arrive pas à trouver la solution ni dans l'aide d'access ni dans les archives. Il est fort probable que j'utilise les mauvais mot clefs.
Dans une appli access, je lance une nouvelle instance d'access Au niveau du module : Dim appAccess as object function titi 'execute l'application Set appAccess = CreateObject("Access.Application.8") ... end function
Je fais diverses opérations sur cette nouvelle instance. Et je termine en voulant fermer l'instance initiale tout en laissant la derniére active.
function fermeture () 'rend visible la nouvelle base appAccess.Visible = True
'quitte la base de mise à jour Application.Quit acSaveYes end function
Or cela ne marche pas, les 2 applis access sont fermées.
Ce que je ne comprends, c'est le fait que c'est un simple copier/coller d'une base que j'ai deja créé dont la différence est le changement de la
base cible pour la nouvelle instance
Dans cette base si je fais set appAccess = Nothing cela ferme la nouvelle instance. Or si je met ce bout de code dans l'appli initiale rien ne se
passe.
Il doit y a avoir une astuce toute bete mais je ne la trouve pas.
Auriez vous une idée ? merci
ja qui se pose des questions sur la propreté de son code
Bonjour joyeux atchoum.
Or cela ne marche pas, les 2 applis Access sont fermées.
cette situation me parait logique car ta 2eme instance est un objet
application de ta 1ere instance. Lorsque tu quittes la 1ere, l'objet
appAccess est fermé (nothing) et ta 2e ne peut plus tourner donc elle quitte
aussi. ceci dit en termes simples et en raccourci. si tu veux que tes 2
applis soient concurrentes il faudrait lancer la 2e par le Shell mais tu
n'auras plus l'automation.
c'était une idée.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"joyeux atchoum" <anonymous@discussions.microsoft.com> a écrit dans le
message de news:265B3B9D-BEDA-4B84-9B28-504D3525E515@microsoft.com...
Bonjour
Je n'arrive pas à trouver la solution ni dans l'aide d'access ni dans les
archives. Il est fort probable que j'utilise les mauvais mot clefs.
Dans une appli access, je lance une nouvelle instance d'access
Au niveau du module : Dim appAccess as object
function titi
'execute l'application
Set appAccess = CreateObject("Access.Application.8")
...
end function
Je fais diverses opérations sur cette nouvelle instance.
Et je termine en voulant fermer l'instance initiale tout en laissant la
derniére active.
function fermeture ()
'rend visible la nouvelle base
appAccess.Visible = True
'quitte la base de mise à jour
Application.Quit acSaveYes
end function
Or cela ne marche pas, les 2 applis access sont fermées.
Ce que je ne comprends, c'est le fait que c'est un simple copier/coller
d'une base que j'ai deja créé dont la différence est le changement de la
base cible pour la nouvelle instance
Dans cette base si je fais set appAccess = Nothing cela ferme la nouvelle
instance. Or si je met ce bout de code dans l'appli initiale rien ne se
passe.
Il doit y a avoir une astuce toute bete mais je ne la trouve pas.
Auriez vous une idée ? merci
ja
qui se pose des questions sur la propreté de son code
Or cela ne marche pas, les 2 applis Access sont fermées.
cette situation me parait logique car ta 2eme instance est un objet application de ta 1ere instance. Lorsque tu quittes la 1ere, l'objet appAccess est fermé (nothing) et ta 2e ne peut plus tourner donc elle quitte aussi. ceci dit en termes simples et en raccourci. si tu veux que tes 2 applis soient concurrentes il faudrait lancer la 2e par le Shell mais tu n'auras plus l'automation. c'était une idée. -- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"joyeux atchoum" a écrit dans le message de news:
Bonjour
Je n'arrive pas à trouver la solution ni dans l'aide d'access ni dans les archives. Il est fort probable que j'utilise les mauvais mot clefs.
Dans une appli access, je lance une nouvelle instance d'access Au niveau du module : Dim appAccess as object function titi 'execute l'application Set appAccess = CreateObject("Access.Application.8") ... end function
Je fais diverses opérations sur cette nouvelle instance. Et je termine en voulant fermer l'instance initiale tout en laissant la derniére active.
function fermeture () 'rend visible la nouvelle base appAccess.Visible = True
'quitte la base de mise à jour Application.Quit acSaveYes end function
Or cela ne marche pas, les 2 applis access sont fermées.
Ce que je ne comprends, c'est le fait que c'est un simple copier/coller d'une base que j'ai deja créé dont la différence est le changement de la
base cible pour la nouvelle instance
Dans cette base si je fais set appAccess = Nothing cela ferme la nouvelle instance. Or si je met ce bout de code dans l'appli initiale rien ne se
passe.
Il doit y a avoir une astuce toute bete mais je ne la trouve pas.
Auriez vous une idée ? merci
ja qui se pose des questions sur la propreté de son code
