Bonjour,

j'ai créé un formulaire sous Infopath 2007. je souhaite automatiser certains champs.
Pour ce la j'ai écrit le code ci dessous qui marche bien dans access (vb6).
Mais quand je l'insère dans infopath ça ne marche pas vb.net ce qui est normal je pense.
Mais je ne m'y connais pas du tout en vb.net et j'aimerais savoir si quelqu'un peut m'aider;

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
17
18
19
20
21
22
23
24
25
26
27
28
29
30
'--- Chargement initial du formulaire
        Private Sub Form_Load()
            RefreshForm()
        End Sub
 
'--- Modification du nom dans la liste déroulante
        Private Sub Ctrl_NOM_Click()
            Requery()
            RefreshForm()
        End Sub
 
'--- Click sur le bouton ajouter
        Private Sub Cmd_Add_Click()
            NOM.Value = Ctrl_NOM.Value
            Cmd_Update_Click()
            Ctrl_NOM.Requery()
        End Sub
 
'--- Click sur le bouton modifier
        Private Sub Cmd_Update_Click()
            Refresh()
        End Sub
 '--- Mise à jour de l'affichage
        Sub RefreshForm()
            Dim x As Boolean
 
            If Recordset.RecordCount = 1 Then x = True
            Cmd_Add.Visible = Not x
            Cmd_Update.Visible = x
        End Sub
--------------------------------------------------------------


Ce code lorsque je rentre mon nom dans le formulaire, les autres champs ayant rapport avec ce nom se remplissent automatiquement dès que je quitte le champ.

Toute aide serait vraiment la bienvenue je ne sais plus quoi faire.

Les erreurs sont les suivantes

--------------------------------------------------------------------------
Erreur 1 Cette instruction ne peut pas apparaître dans le corps d'une méthode. Elle est interprétée comme la fin de la méthode.
Erreur 2 Le nom 'Requery' n'est pas déclaré.
Erreur 3 Le nom 'NOM' n'est pas déclaré.
Erreur 4 Le nom 'Ctrl_NOM' n'est pas déclaré.
Erreur 5 Le nom 'Ctrl_NOM' n'est pas déclaré.
Erreur 6 Le nom 'Refresh' n'est pas déclaré.
Erreur 7 Le nom 'Recordset' n'est pas déclaré.
Erreur 8 Le nom 'Cmd_Add' n'est pas déclaré.
Erreur 9 Le nom 'Cmd_Update' n'est pas déclaré.
-----------------------------------------------------------------------

je fais bien un Imports de mon formulaire dans mon code et Nom, c'est le nom d'un de mes champs

Merci de votre aide.