update datagrid

[rafpas]

Private Sub MyGrid_UpdateCommand(ByVal source As Object, ByVal e As System.Web.UI.WebControls.DataGridCommandEventArgs ) Handles MyGrid.UpdateCommand
Dim NewsID As Integer
Dim NewsDataTextBox As TextBox
Dim NewsTitoloTextBox As TextBox
Dim NewsDescrizioneTextBox As TextBox
Dim strSQL As String
NewsID = MyGrid.DataKeys(CInt(e.Item.ItemIndex))
NewsDataTextBox = e.Item.Cells(2).Controls(0)
NewsTitoloTextBox = e.Item.Cells(3).Controls(0)
NewsDescrizioneTextBox = e.Item.Cells(4).Controls(0)
strSQL = "Update News set Data='" & NewsDataTextBox.Text & "', Titolo='" & NewsTitoloTextBox.Text.Replace("'", "''") & "', " & _
"Descrizione='" & NewsDescrizioneTextBox.Text.Replace("'", "''") & "' where ID_News =" & NewsID
Dim Cmd As New OleDbCommand(strSQL, Conn)
Conn.Open()
Try
Cmd.ExecuteNonQuery()
Messaggio.InnerHtml = "Record aggiornato
"
Catch Exc As Exception
Messaggio.InnerHtml = "ERROR: Non puoi aggiornare questo record
"
Messaggio.Style("color") = "red"
End Try
Conn.Close()
BindGrid()
End Sub

ciao ragazzi chi mi sa dire dove sbaglio
non da errore pero non fa update
ho provato anche a fare una query parametrizzata stesso risultato

saluti rafpas

[giannola]

la connessione dove la apri?

[rafpas]

grazie ho risolto e bastato mettere la condizione IsPostBack cosi:

Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Conn = New OleDbConnection(Application("strConn"))
If Not (IsPostBack) Then
BindGrid()
End If
End Sub
saluti