Delete problem

[Cliff]

I'm trying to delete a row from my databound datagridview....
here is my code so far


Dim adapter As OleDb.OleDbDataAdapter = New OleDb.OleDbDataAdapter(publicStr, conn)
adapter.DeleteCommand = New OleDb.OleDbCommand("DELETE FROM Waarnemers WHERE Naam = Henk", conn)
'adapter.DeleteCommand.Parameters.Add("@Naam", OleDb.OleDbType.Char, 50, "Naam").SourceVersion = DataRowVersion.Original
adapter.Update(ds, "Waarnemers")

Any Ideas what's goind wrong ?
Thx