[AC-2007] enregistrer sans effacer zone de texte

[ulovb]

Bonjour,
j'ai un formulaire avec 6 de zones de texte.
Sur la commande enregistrer, j'aimerai pouvoir enregistrer mes données sans vider le contenu de mes zones de texte 1 et 2.
Merci.

[marot_r]

Ton formulaire est liéé à une table ?

L'astuce consisterait à sauvegarder dans des variables le contenu saisie puis à le remettre dans le formulaire losrque tu arrives sur un nouvel enregistrement.

un truc du genre :

Code :

1
2
3
4
5
6
7
'À définir au niiveau du module, en dehors de toutes procédures
dim V1 as string 'Utilser des noms plus significatifs ex : NomClient, Produit, Adresse ou autre
dim V2 as string
dim V3 as string
dim V4 as string
dim V5 as string
dim V6 as string

sur l'événement AvantMAJ du formulaire (vérifier que c'est la bonne place)

Code :

1
2
3
4
5
6
V1=me.z1
V2=me.z2
V3=me.z3
V4=me.z4
V5=me.z5
V6=me.z6

sur l'événement SurActivation du formulaire (vérifier que c'est la bonne place)

Code :

1
2
3
4
5
6
7
8
9
if me.newrecord then
   'C'est un nouvel enregistrement, récupère les données
   me.z1=V1
   me.z2=V2
   me.z3=V3
   me.z4=V4
   me.z5=V5
   me.z6=V6
end if

Je ne l'ai pas testé mais cela devrait marché.

A+