Mise à jour d'une table acces générant message sur évènement clic
cs_fitac28
Messages postés15Date d'inscriptionmardi 3 février 2004StatutMembreDernière intervention23 août 2005
-
24 juin 2004 à 17:51
cs_ITALIA
Messages postés2169Date d'inscriptionvendredi 20 avril 2001StatutMembreDernière intervention30 juin 2009
-
25 juin 2004 à 08:18
Formulaire Nom prénom adresse...
Objectif: sur clic du bouton nouveau 1/ vider les zones
2/ les remplir 3/ procéder à un update pour remettre à jour ma table tiers dans acces.
Qd bloc with absent, les zones de mon formulaire se vident.
Qd bloc with présent ai message :
"Erreur Compilation procédure sub ou functiion non définie"
Voici code me posant problème:
Private Sub cmd_Nouveau_Click()
Call ZoneClear
With tiers
If .State = 1 Then .Close
.Open
For i = 1 To .RecordCount
nexti
If i > 0 Then
.MoveLast
.AddNew
tiers!TIE_RS = Me.txt_RS.Text
tiers!TIE_Adr1 = Me.txt_Adr1.Text
tiers!TIE_Adr2 = Me.txt_Adr2.Text
tiers!TIE_CP = Me.txt_CP.Text
tiers!TIE_Localite = Me.txt_Localite.Text
.Update
.Close
Else
.AddNew
tiers!TIE_RS = Me.txt_RS.Text
tiers!TIE_Adr1 = Me.txt_Adr1.Text
tiers!TIE_Adr2 = Me.txt_Adr2.Text
tiers!TIE_CP = Me.txt_CP.Text
tiers!TIE_Localite = Me.txt_Localite.Text
.Update
.Close
End If
End With
End Sub
A voir également:
Mise à jour d'une table acces générant message sur évènement clic