Discussion :

[egg3774]

Bonjour,

Je suis débutant avec VBS. Je ne demande comment faire pour ouvrir un formulaire selon les conditions suivantes ? J'ai un premier formulaire avec deux bouton: 1. Ouvrir le formulaire en mode lecture uniquement. 2. Ouvrir le formulaire en mode edition. Très facile pour la plupart mais pas pour moi.

Merci,

egg3774

[Taoueret]

Sur tes boutons, tu peux ajouter du code sur l'évènement click.

Ensuite quand à savoir quel code mettre dedans, intéresse toi à la commande docmd.openform et à ses arguments

[egg3774]

Bonjour,

Merci Taoueret. J'ai oublié de préciser que je travail en VBS.

Voici mon code

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Private Sub ShowRecord_Click()
 
On Error GoTo Err_Annuler_Click
 
 
    DoCmd.OpenForm "frm_repertoire", , , _
        "[repertoire_ID]=" & Me.lstSearch.Column(0), acFormReadOnly
 
Exit_Annuler_Click:
    Exit Sub
 
Err_Annuler_Click:
    MsgBox ("Vous devez choisir une compagnie")
    Resume Exit_Annuler_Click
 
End Sub

Malheureusement, ca ne fonctionne pas. Je ne sais pas pourquoi ?

[Taoueret]

Est-ce que ça te génére une erreur ou tout simplement ça ne fait rien ?

Dans Err_Annuler_Click met msgbox err.description afin d'avoir le message d'erreur... Cela nous eclairera peut-etre plus

[egg3774]

Je viens de trouver mon erreur. Ca fonctionne et merci à tous pour votre aide.

egg3774