Problem with OleDBCommand Update

[Mark Sandfox]

The following code does nothing (not even give an error). The record
remains the same.

Sub Save_The_Buzz(Sender as Object, E as EventArgs)
Dim cnTheBuzz as OleDbConnection
Dim strUpdate as string
Dim cmdUpdate as OleDbCommand

cnTheBuzz = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data
Source=C:\Inetpub\wwwroot\SAB\sdb\TheBuzz.mdb")
strUpdate = "Update TheBuzz Set TheBuzz=@TheBuzz Where ID = 1"

cmdUpdate = New OleDbCommand(strUpdate, cnTheBuzz)
cmdUpdate.Parameters.Add("@TheBuzz",tbTheBuzz.Text )

'place try-catch routine here
cnTheBuzz.Open()
cmdUpdate.ExecuteNonQuery()
cnTheBuzz.Close()

Response.Redirect( "DE_the_buzz_update_confirm.aspx" )
End Sub
Scratching my head because this code has been reused a hundred times in the
past.