Bonjour a vous,
Pour la modification des champs de mon formulaire, j ai procede comme suite:
lorsque l utilisateur clique sur modifier un formulaire s affiche a lui demandant d entre le code du produit a modifier que je recupere pour pouvoir faire une recherche dessus comme cecile probleme est que ca ne marche lorsque j execute j ai une erreur a ce niveau
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15 Dim rs as DAO.RecordSet Dim lsql as string lsql = "Select * from produit where codeP='"& Me.code &"';" ' nom de textbox sur le formulaire (code) Set rs = CurrentDb.openrecordSet(lsql,dbOpensnapshot) if (rs.RecordCount > 0){ Me.NomProduit.Text = rs("nomp") ....... ....... // meme chose pour les autres champs }
avec comme code d erreur : 3464
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2 Set rs = CurrentDB.openrecordSet(lsql,dbOpensnapshot)
Type de données incompatible dans l expression du critère
Svp vous aidez moi pour pouvoir continuer mon projet
Partager