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 7392 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 7392 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
Rejoignez-nous