Update database.

Hej
Følgende kode.
Dim dbProvider As String
        Dim dbSource As String
        Dim con As New OleDb.OleDbConnection
        Dim ds As New DataSet
        Dim da As OleDb.OleDbDataAdapter
        Dim sql As String
        Dim x As String
        dbProvider = "PROVIDER=Microsoft.ACE.OLEDB.12.0;"
        dbSource = "Data Source = " & Form1.Label3.Text
        con.ConnectionString = dbProvider & dbSource
        con.Open()
        sql = "SELECT * FROM bruger"
        da = New OleDb.OleDbDataAdapter(sql, con)
        da.Fill(ds, "passwords")
        x = ds.Tables("passwords").Rows(Form1.ComboBox1.SelectedIndex).Item(2)
        If x = TextBox1.Text Then
            If TextBox2.Text = TextBox3.Text Then
                'gem nyt pass
                Dim cb As New OleDb.OleDbCommandBuilder(da)

                ds.Tables("passwords").Rows(Form1.ComboBox1.SelectedIndex).Item(2) = TextBox2.Text
                da.Update(ds, "passwords")

                MsgBox("Password ændret ", MsgBoxStyle.Information, "Password ændret")

            End If
        Else
            MsgBox("Nuværende password forkert", MsgBoxStyle.Critical, "Forkert password")
        End If

        con.Close()
        Me.Close()

Giver denne melding, når den kommer til linjen "da.Update(ds, "passwords")"
Der er en syntaksfejl i UPDATE-sætningen.

Hvor og hvorfor ?