Des erreurs de compilations

tamcheiktt
Messages postés
16
Date d'inscription
lundi 16 janvier 2006
Statut
Membre
Dernière intervention
19 avril 2010
- 1 févr. 2006 à 16:02
jrivet
Messages postés
7393
Date d'inscription
mercredi 23 avril 2003
Statut
Membre
Dernière intervention
6 avril 2012
- 1 févr. 2006 à 16:37
Salut je n'ai pas encore trouvé une solution le compilateur m'affiche toujour une erreur
indiquer par la couleur rouge cidessous
merci de me donner un cout de main

rivate Sub valider_Click()
Dim MaDb As Database
Dim Monsql As String
Dim controle As Control
Dim f As Form
Set MaDb = CurrentDb()
Set f = Form!F_client(il affiche une erreur )
Monsql = "INSERT INTO T_client([N°client],Type_client,prenom, Tel , Tel_portable, Adresse, Code_postal, ville, Site_web, Email)"
Monsql = Monsql & "VALUES('" & f.N°client & "', '" & f.Type_client & "' ,'" & f.Prenom & "', '" & f.Tel & "', '" & f.Tel_portable & "','" & f.Adresse & "','" & f.Code_postal & "','" & f.ville & "','" & f.Site_web & "','" & f.Email & "')"


DoCmd.SetWarnings False
DoCmd.RunSQL Monsql
DoCmd.SetWarnings True
msgbox "Le client" & f.Nom & " ete bien enreg"
For Each controle In f.Controls
If controle.ControlType = acTextBox Then
controle = Null
End If
Next controle

1 réponse

jrivet
Messages postés
7393
Date d'inscription
mercredi 23 avril 2003
Statut
Membre
Dernière intervention
6 avril 2012
60
1 févr. 2006 à 16:37
Salut,

Est ce que Form!F_Client est un objet de type Form.

Si ce n est pas le cas c est normal.

Je ne vois que ca.

@+
Julien
0