datagrid更新について

分類:[.NET]

はじめまして。
VB.NET初心者です。VB.NETでdatagridのデータを更新しようと思っています。
修正した値が反映されず、修正前の値がそのまま表示されてしまいます。
どのようにしたら良いでしょうか？
何方かよろしくお願いします。
If IsPostBack Then
Dim strconn As String
strconn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\test.mdb"
Dim cn As OleDbConnection
cn = New OleDbConnection(strconn)
cn.Open()
Dim cmd As New OleDbCommand
cmd.Parameters.Add(New OleDbParameter("@aaa", OleDbType.Char.VarChar, 6))
cmd.Parameters("@aaa").Value = DataGrid1.DataKeys(CInt(e.Item.ItemIndex))
Dim ccc As String = CType(e.Item.Cells(2).Controls(0), TextBox).Text
cmd.Parameters.Add(New OleDbParameter("@bbb", OleDbType.Char.VarChar, 6))
cmd.Parameters("@bbb").Value = ccc
cmd.CommandText = "update test set bbb=@bbb where aaa=@aaa"
cmd.Connection = cn
Dim dr As OleDbDataReader = cmd.ExecuteReader
cn.Close()
Server.Transfer("test.aspx")
End If