VB.NET

VB.NET RSS

Data Adapter Update Command

Please support our VB.NET advertiser: Intel Parallel Studio Home

•

Join Date: Aug 2008

Posts: 1

Reputation: hongpuay is an unknown quantity at this point

Solved Threads: 0

hongpuay

Offline

Newbie Poster

Data Adapter Update Command

Aug 5th, 2008

Hey, I face a problem in updating data to the original database.

Everytime when I clicked the update button. an error came out in the coding where I highlighted below, saying syntax error in update statement!

Can somebody please pin-point my mistake?

Help with Code Tags

(Toggle Plain Text)

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
         Me.JigTableAdapter.Fill(Me.JigDataSet.jig)

        con.ConnectionString = "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source = C:\jig.mdb"
        con.Open()

        sql = "SELECT * FROM jig"
        da = New OleDb.OleDbDataAdapter(sql, con)

        da.Fill(ds, "jig")
        con.Close()

        MaxRows = ds.Tables("jig").Rows.Count
        inc = 0

    End Sub

Private Sub btnUpdate_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnUpdate.Click
        Dim cb As New OleDb.OleDbCommandBuilder(da)

        ds.Tables("jig").Rows(inc).Item(0) = JIG_NOTextBox.Text()
        ds.Tables("jig").Rows(inc).Item(1) = JIG_NAMETextBox.Text()
        ds.Tables("jig").Rows(inc).Item(2) = JIG_MODELTextBox.Text()
        
        da.Update(ds, "jig")

        MsgBox("Data updated!")

    End Sub

Last edited by Ancient Dragon; Jan 5th, 2009 at 3:33 pm. Reason: add code tags