modifier le contenue d'une base

Version imprimable

salut a tous je veux modifier le continu d'un chanp d'una base

mais il me sorte cette error

Run-time error '3219'

Invalibal operation

et voila le code

Code:

1
2
3
4
5
6
7
Private Sub Command1_Click()
Dim bs As Database
Dim tb, rech As Recordset
Set bs = OpenDatabase(App.Path & "\base.mdb")
Set tb = bs.OpenRecordset("wajdi")
bs.OpenRecordset ("UPDATE wajdi set nom = " & Text1.Text & ", prenom = " & Text2.Text & ", cin =" & Text3.Text & ", proffession =" & Text8.Text & ", adresse = " & Text4.Text & ", codepuk =" & Text7.Text & ", jour =" & DTPicker1.Value & ", code= " & Text6.Text & " where cin=" & rechcin.Text1.Text & "")
End Sub

est ce que vous pouvez m'aider

27/07/2009, 08h47
Delbeke

Essaye de mettre des quotes simples avant et apres les valeurs string

Code:

bs.OpenRecordset ("UPDATE wajdi set nom = '" & Text1.Text & "', prenom ....
27/07/2009, 10h28
wajdisoft

Citation:

Envoyé par Delbeke

Essaye de mettre des quotes simples avant et apres les valeurs string

Code:

bs.OpenRecordset ("UPDATE wajdi set nom = '" & Text1.Text & "', prenom ....

---

la mème problème

:cry: