erreur en VB Résolu

Question

Bonjour,

j'ai besoin de votre aide

je travaille avec VB6 et access

je reçois le message suivant : < type de données imcompatibles dans l'expression du critère>
lors de l'éxécution de ce code:
Set rstModart = New ADODB.Recordset
   rstModart.CursorType = adOpenKeyset
   rstModart.LockType = adLockOptimistic
   rstModart.Open "SELECT * FROM projet " & _
      "WHERE codeprj ='" & TxtCod.Text & "'", cnnADO, , , adCmdText

codeprj est un champ de type de donnée : "numéro auto"

le code ce-dessus ça marche pour les champs de type de donnée "texte"

merci

jjsteing · Answer

bonjour

essaie ca :
rstModart.Open "SELECT * FROM projet " & _
"WHERE codeprj =" & TxtCod.Text & "", cnnADO, , , adCmdText

en enlevant le '

chinwii · Answer

bonjoir,
toujours ça marche pas
merci

jjsteing · Answer

et..

rstModart.Open "SELECT * FROM projet " & _
"WHERE codeprj =" & CVar(TxtCod.Text) & "", cnnADO, , , adCmdText

chinwii · Answer

merci,
prb résolu
mais je reçoi 1 autre erreur pour:

rstModart!codeprj = TxtCod.Text 

 le message est : "le champs ne peut pas etre met à jour"

jjsteing · Answer

re..

tu veux mettre la valeur de TxtCod.Text dans rstModart!codeprj ou que TxtCod.Text affiche la valeur de rstModart!codeprj ?

chinwii · Answer

je veux mettre la valeur de TxtCod.Text dans rstModart!codeprj

jjsteing · Answer

dans ce cas, c'est plus un select, mais un update (si la ligne existe déjà) ou un insert (si la ligne n existe pas)

chinwii · Answer

stp donne moi le syntaxe

chinwii · Answer

merci jjsteing
c bon j'ai compris où j'ai le prb
c normal que je reçois 1 erreur "le champs ne peut pas etre mis à jour"pour:

rstModart!codeprj = TxtCod.Text

car le champs codeprj est de type de donnée "muméro auto"; l'incrimentation est automatique

merci bcp

jjsteing · Answer

de rien ;)

met ton post en résolu si c'est le cas :p

Erreur en VB

10 réponses

Votre réponse

Discussions similaires