
07/04/2005, 10:14
|
 | Moderador | | Fecha de Ingreso: febrero-2002 Ubicación: México D.F
Mensajes: 8.004
Antigüedad: 23 años Puntos: 50 | |
Prueba de ésta forma: Cita: Sub datagrid_delete(ByVal sender As Object, ByVal e As DataGridCommandEventArgs)
TextBox1.Text = isediting.ToString + CStr(DataGrid1.DataKeys(e.Item.ItemIndex))
If Not isediting Then
Dim iddeinventario As Integer = CType(dg.DataKeys.Item(e.Item.ItemIndex), Integer)
dbConnection = New System.Data.SqlClient.SqlConnection("server='192.1 68.100.254'; user id='SA'; password=''; database='Sistema Administrativo'")
dbCommand = New System.Data.SqlClient.SqlCommand("DELETE FROM [Inventario] WHERE [Inventario].[IDDeInventario] =" & iddeinventario, dbConnection)
dbConnection.Open()
dbCommand.ExecuteNonQuery()
dbConnection.Close()
DataGrid1.CurrentPageIndex = 0
DataGrid1.EditItemIndex = -1
bindgrid()
End If
End Sub Salu2 |