Discussion :

[Marc_27]

Bonjour,

J'ai une application que sert de menu pour lancer 3 autres applications. Pour le faire, j'utilise le code:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
sor = 0
t = TIME
Static ac As Access.Application: Set ac = New Access.Application
acapp.AutomationSecurity = msoAutomationSecurityLow
ac.Visible = True
If t < #9:00:00 AM# Then
    ac.OpenCurrentDatabase ("E:\Data\Impression\xGestion Clients.mdb")
    Else
    ac.OpenCurrentDatabase ("E:\Data\Impression\Gestion Clients.mdb")
End If

J'ai deux questions concernant ce code:

1) Pourquoi la ligne de comande

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

acapp.AutomationSecurity = msoAutomationSecurityLow

ne marche pas?

2) Dans le formulaire où se trouvent les bouttons qui lancent des autres applications, j'ai 3 textboxes MAG, NOM et MEC, avec des valeurs que j'ai besoin dans chaque application. Est-ce que c'est possible de les recuperer lors de l'overture de ces applications?

Merci d'avance pour des réponses,
Marc

[Access Newbie]

acapp.AutomationSecurity = msoAutomationSecurityLow

1) Pourquoi la ligne de comande

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

acapp.AutomationSecurity = msoAutomationSecurityLow

ne marche pas?

Je pense que c'est tout simplement parce qu'il n'y a pas de declaration pour acaap. Je pense meme qu'il s'agit d'un copier-coller que tu as mal fait : essaie avec

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ac.AutomationSecurity = msoAutomationSecurityLow

2) Dans le formulaire où se trouvent les bouttons qui lancent des autres applications, j'ai 3 textboxes MAG, NOM et MEC, avec des valeurs que j'ai besoin dans chaque application. Est-ce que c'est possible de les recuperer lors de l'overture de ces applications?

Merci d'avance pour des réponses,
Marc

Oui, il te suffit d'enregistrer ces valeurs dans une table. Puis tu n'as plus qu'a faire une table liée pour recuperer ces valeurs

En esperant vous avoir aidé

[Marc_27]

Merci pour des reponses, Access Newbie.

Esc-ce qu'il n'y aurait un moyen sans avoir une table liée?
Le formulaire menu reste toujours ouvert dans l'ecran.

[Access Newbie]

Si la table liée vous embete vous pouvez essayer de passer par un objet de type ADODB.connection (en esperant que vous utilisiez ADO ). mais là je vous invite à parcourir le forum pour trouver une réponse plus appropriée.

[Marc_27]

C'est possible donc de chercher des valeurs d'un formulaire ouvert par ADO? J'ai pensé qu'il cherchait dans les tables seule...


Ce domage, mais j'essayé avec

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ac.AutomationSecurity = msoAutomationSecurityLow

et il n'a pas marché aussi...

j'ai mis aussi

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Public ac

dans la zone au-dessus du module...

[Marc_27]

C'est bon!!

J'ai utilisé de table et j'ai trouvé un moyen pour qui marche bien...


Merci pour l'aide