Discussion :

[JYL74]

Bonjour,

Je cherche à exécuter une commande paramétrable:
Exemple (qui ne marche pas) :

Code :

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

Run MaChaineDeCommande

où MaChaineDeCommande contient par exemple "DoCmd.OpenForm 'MonForm'"
J'ai essayé avec Run, CallByName.
Le but est de créer des formulaires en nombre.

Merci de votre aide.

[jojo5650]

EXECUTE tout bêtement je pense mais regarde en faisant F1

Bonjour,

Je cherche à exécuter une commande paramétrable:
Exemple (qui ne marche pas) :

Code :

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

Run MaChaineDeCommande

où MaChaineDeCommande contient par exemple "DoCmd.OpenForm 'MonForm'"
J'ai essayé avec Run, CallByName.
Le but est de créer des formulaires en nombre.

Merci de votre aide.

[JYL74]

Merci votre réponse mais Execute ne semble pas fonctionner :
Voici ce que ce que donne l'aide Access pour Execute :

Méthode Execute

La méthode Execute exécute l'action de balise active spécifiée.

Les actions de balise active sont des processus programmés dans des balises actives qui permettent aux utilisateurs d'effectuer certaines fonctions liées à la balise active. Par exemple, pour une balise active, une action peut consister à accéder à un site Web, tandis qu'une autre action insère des informations de contact provenant de Microsoft Outlook, et qu'une autre encore affiche une carte et des instructions de conduite.

expression.Execute()
expression Obligatoire. Expression renvoyant un objet SmartTagAction.



Remarques
Appeler la méthode Execute produit une erreur d'exécution si la balise active est :

Située dans un rapport.
Située dans un formulaire en mode Création, en mode Tableau croisé dynamique ou en mode Graphique croisé dynamique.

Je vais investiguer du côté des SmartTagAction.

[jojo5650]

je travaillle aussi en asp et je me sert de la commande execute pour exécuter des batch.
Toutes mes excuses

Merci votre réponse mais Execute ne semble pas fonctionner :
Voici ce que ce que donne l'aide Access pour Execute :


Je vais investiguer du côté des SmartTagAction.

[FreeAccess]

Bonjour,

Le but est de créer des formulaires en nombre

Pourrais-tu nous préciser ce que tu souhaite réellement faire

Par créer, tu veux dire:
- "construire" entièrement un nouveau formulaire...
Créer dynamiquement un formulaire
- "ouvrir" plusieurs formulaires en même temps

[JYL74]

Bonjour,

J'ai défini un modèle de formulaire "standard" avec des boutons de commandes, afin de faire de la création de menus.

Ce formulaire est dupliqué autant de fois que nécessaire, et toutes les caractéristiques des instances sont stockées dans une table (légende des boutons, etc, et le top serait de pouvoir stocker dans cette table la procédure à exécuter pour chaque bouton.

A l'ouverture d'un formulaire je lit ses caractéristiques dans la table de paramétrage, et je souhaite exécuter la chaine de commande associée à chaque bouton.

Tout le reste de mon code fonctionne, sauf cette exécution de code, exprimée en chaine.

Chaque bouton à un code standard identique dans tous les formulaires (exemple pour bouton 1):

Code :

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

1
2
3
4
Private Sub cmd1_Click()
    On Error Resume Next
    vrep = Run(Form_Execute(1))
End Sub

et la procédure Form_Execute (commune à tous les formulaires) devrait exécuter la chaine d'index 1 dans la table paramètre pour le formulaire en cours.

Code :

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

1
2
3
Function Form_Execute(index)
    Execute arProc(index)
End Function

arProc étant un tableau chargé à l'ouverture du formulaire par lecture de la table de paramètres. (Execute représente ce que je cherche à coder, arProc(index) valant par exemple "DoCmd.OpenForm 'MonForm2'"

[User]

Bonsoir,

Regardes peux-être du côté de la fonction Eval, touche

Par contre elle prend en argument une expression qui peut-être une fonction

[JYL74]

Bonjour,

La fonction Eval ne permet pas de faire ce que je souhaitais.
Pour la beauté du geste, j'ai solutionné en :

• créant un module temporaire
• écrivant la chaine de commande dans une procédure temporaire
• exécutant la procédure temporaire
• supprimant le module temporaire

le tout en utilisant VBE.
Çà fonctionne, mais au bout du compte, çà n'est pas très stable, et je vais revenir à une gestion standard de mes formulaires.

à tous, et encore bravo pour le forum !