Visual Basic 2010 MS Access problem!

Povežem s bazom, povučem podatke, izmjenim podatke u jednoj koloni, vidim da je promijenjeno, ali ne uspjevam UPDATATI podatke da ih zapamti i snimi u access File-u.

 Dim sqlconstr As String = "Provider=Microsoft.ACE.OLEDB.12.0; user id=Admin; Data Source=LDP BP.accdb;"

 With Tablica
            .MultiSelect = False
            sqlSelectLinije = "SELECT DISTINCT Linija, [Stroj na prvoj operaciji], [Stroj na drugoj operaciji], [Datum izmjene], Napomena, [U radu] " _
                & "FROM Linije WHERE [U radu] = True ORDER BY Linija;"
            objLinijaDA = New OleDb.OleDbDataAdapter(sqlSelectLinije, dbconn)
            objLinijaDA.Fill(DS, "Linije")
            dtLinije = DS.Tables("Linije")
            sqlSelectProizvod = "SELECT DISTINCT Proizvod, Verzija, Cijena, [Datum izmjene], [U radu] " & "FROM Proizvodi WHERE [U radu] = True ORDER BY Proizvod;"
            objProizvodDA = New OleDb.OleDbDataAdapter(sqlSelectProizvod, dbconn)
            objProizvodDA.Fill(DS, "Proizvodi")
            dtProizvodi = DS.Tables("Proizvodi")

            For i = 0 To dtProizvodi.Rows.Count - 1

                dtProizvodi(i)("Verzija") = "T"
            Next

            Try
                objProizvodDA.Update(DS, "Proizvodi") OVO JE LINIJA U KOJOJ JAVI POGREŠKU
            Catch ex As Exception
                MessageBox.Show(ex.ToString)
            End Try

Molim pomoć