Discussion :

[wajdisoft]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[Delbeke]

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

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[wajdisoft]

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

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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

---

la mème problème