Type de données incompatible dans l'expression du critere dans un update.

beninou04 Messages postés 2 Date d'inscription mardi 25 octobre 2011 Statut Membre Dernière intervention 25 octobre 2011 - 25 oct. 2011 à 11:21
ucfoutu Messages postés 18038 Date d'inscription lundi 7 décembre 2009 Statut Modérateur Dernière intervention 11 avril 2018 - 25 oct. 2011 à 12:32
Voila j'ai un probleme avec ma modification.
Je veux modifier un emprunteur tout marche jusqu'a ce que je souhaite modifier son code etudiant qui est true ou false .
je ne sais pas comment le modifier. Voici mon code comment j'ai essayé mais sa me met le message d'erreur " type de donnees incompatible dans l'expression du critere. "


Private Sub Command1_Click()
Dim req As String
Dim mess As Integer
Dim bool As Boolean

If option1 = True Then
bool = True
Else
bool = False
End If

If bool = True Then
code_etudiant = True
Else
code_etudiant = False
End If




mess = MsgBox("Etes vous sur de vouloir modifier", vbYesNo, "MODIFIER")
If mess = vbNo Then Exit Sub


req "UPDATE emprunteur SET nom_emprunteur'" & Text1 & "', prenom_emprunteur ='" & Text2 & "' , date_naissance_emprunteur ='" & Text3 & "' , code_etudiant = '" & bool & "' where code_emprunteur = " & Combo1

Bibliotheque.Execute req


MsgBox "Emprunteur modifié avec succé ", vbExclamation


Combo1.Text = "<code emprunteur>"
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""

'INITIALISER LE FORMULAIRE
Form_Load

Merci de repondre si quelqu'un aurait une solution.

1 réponse

ucfoutu Messages postés 18038 Date d'inscription lundi 7 décembre 2009 Statut Modérateur Dernière intervention 11 avril 2018 231
25 oct. 2011 à 12:32
bonjour,
fais un simple msgbox de ta requête !
Une booléenne n'est pas une chaine de caractères !

Je suis par ailleurs également inquiet en ce qui concerne ton champ date_naissance_emprunteur, à moins qu'il ne soit pas de type Date (un type Date n'est pas non plus une chaîne de caractères).
Un conseil : une requête qui ne marche pas "directement" dans la base, ne risque pas demarcher depuis VB.

____________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches d'autres forumeurs.
Pas d'aide en ligne installée ? ==> ne comptez pas sur moi pour simplement vous dire ce qu'elle contient
0