[ismail2012]

بسم الله الرحمن الرحيم
السلام عليكم ورحمة الله وبركاتة

استخدم هذا الكود من أجل الأضافة

كود :

'جمل الأتصال
Public ds1 As New DataSet
    Public dc As New OleDbConnection("Provider=Microsoft.jet.oledb.4.0; Data Source= C:/db1.mdb")
  Public constr As String=("select * from table name")    
Public da As New OleDbDataAdapter(constr, dc)
    Public da1 As New OleDbDataAdapter("select * from Contents", dc)
    Public cb As New OleDbCommandBuilder(da)

'code  
Dim newrow As System.Data.DataRow
        newrow = ds1.Tables("table name").NewRow
        newrow.Item(0) = TextBox1.Text
        newrow.Item(1) = TextBox2.Text
        ds1.Tables("table name").Rows.Add(newrow)
                         da.InsertCommand = cb.GetInsertCommand
        da.Update(ds1, "table name")
dc.Close

المطلوب كود التعديل ولكن بنفس الطريقة يعني مش خلال SQL