اين مدافعي الداتا جريد

السلام عليكم

و نفد هدا كود وإن شاء الله سوف تعمل datagridview مكان datagrid يا أخي إستعمل

database لإرسال البيانات إلى button_mise_Ajour () تم إضغط زر datagrid ملاحظة إدا أردت إظافة سطر جديد إضغط على أخرسطرفارغ في

code :

dim ds as dataset,ad as dataadapter,connection as connecion

sub form_load(...)

con.ConnectionString = "provider=microsoft.jet.oledb.4.0;data source=stagiaire.mdb;"

connection.Open()

commande = New OleDbCommand("requete", connection)

ad = New OleDbDataAdapter(commande)

ad.Fill(ds, "table")

datagrid1.datasource=ds

datagrid1.datamembre="table"

end sub

sub button_mise_Ajour(...)

MiseA_Jour()

end sub

Sub MiseA_Jour()

OCBuilder = New OleDbCommandBuilder(ad)

ad.Update(ds, "table")

ds.Clear()

ad.Fill(ds, "table")

datagrid1.datasource=ds

datagrid1.datamembre="table"

End Sub