uso conexion DAO, y Access 2000.
Quedo de ustedes y a su pronta respuesta agradesco de ante mano grax

| |||
[Ayudar]Eliminar una fila de msflexgrid y en Access hola buenas tardes, quisiera pedirles una ayuda tengo un problema ya que llevo varios dias y no logro eliminar una fila de msflexgrid esta se conecta a una base de datos y me muestra los datos pero quiero selecionar una fila y eliminarla. uso conexion DAO, y Access 2000. Quedo de ustedes y a su pronta respuesta agradesco de ante mano grax ![]() |
| |||
Respuesta: [Ayudar]Eliminar una fila de msflexgrid y en Access Una forma de Eliminar los Registros de un Flex es como esta:
Código:
Obviamente tendras que adaptarlo a tus necesidades cambiando los nombres del flex asi com la conexión y los registrosIf MsFlexBancos.Row = 0 Then MsgBox "No hay ningún registro para eliminar", vbInformation Exit Sub End If With MsFlexBancos ' pregunta If MsgBox("Se va a eliminar el registro : " & vbNewLine & _ String(60, "-") & vbNewLine & _ "Id Bancos: " & .TextMatrix(.Row, 0) & vbNewLine & _ "Nombre: " & .TextMatrix(.Row, 1) & vbNewLine & _ String(60, "-"), _ vbExclamation + vbYesNo, "Eliminar Registros") = vbYes Then ' Elimina cnn.Execute "DELETE FROM Tbl_Bancos WHERE IdBancos = '" & .Text & "'" ' vuelve a cargar los datos en el flexgrid If rs.State = adStateOpen Then rs.Close rs.Open "SELECT * FROM Tbl_Bancos ORDER BY IdBancos", cnn, adOpenStatic, adLockOptimistic Call Llenar_MsFlexGrid(rs, Me.MsFlexBancos) Call Bancos_Listados(MsFlexBancos) End If End With Espero aberte ayudado... |
Etiquetas: |