Menú

Mostrar Mensajes

Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.

Mostrar Mensajes Menú

Mensajes - Nike77

#1
Bueno haber quien me puede dar una mano...
el asunto es el sig. tengo todo realizo la consultas todo bien, pero mientras no cierre el programa los cambios quedan, pero al cerrarlo y volverlo a abrir no guarda las modificaiones en la db...

el code es el sig.

'identifico donde se esta en el datagridview
Dim NumFila As Integer = Me.DataGridView.CurrentCell.RowIndex
' Creo la consulta
Dim sql As String = "DELETE * FROM Tabla WHERE Filtro = " & Me.DataGridView.Item(0, NumFila).Value
'creo un comando
Dim Comando As New OleDbCommand(sql, cn)
Dim Cambios As Integer

Try
'conexion
cn.Open()
'ejecuto comando
Cambios = comando.ExecuteNonQuery()
MsgBox("Registros borrados: " & Cambios )

'actualizo el datagrid
Me.RefrescarDatos()

Catch ex As Exception
'mostrar el error
MessageBox.Show("error" & Err.Number.ToString & vbCrLf & ex.Message)
Finally
'cierro la conexion solo si esta abierta
If (cn.State And ConnectionState.Open) <> 0 Then
cn.Close()
End If
End Try

desde ya gracias...