sub TabNews_Delete(obj as object, e as DataGridCommandEventArgs)
dim mycommand as sqlcommand
dim deletecmd as string="Delete from anagraficoClienti where ACLCodiceCliente=@cod"
MyCommand=New SQLCommand(DeleteCmd,objconn)
MyCommand.Parameters.Add(New SqlPArameter("@cod", SqlDBType.bigint, 11))
MyCommand.Parameters("@cod").Value=DataGrid1.DataK eys(Cint(E.item.itemindex))
MyCommand.Connection.Open()
try
MyCommand.ExecuteNonQuery()
catch exc as SQLexception
Message.InnerHtml="Errore"
end try
MyCommand.Connection.Close()
BindGrid()
end sub