• Jueves 14 de Noviembre de 2024, 18:42

Mostrar Mensajes

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


Temas - mega_taco

Páginas: [1]
1
Bases de Datos / Boton de guardar
« en: Miércoles 3 de Junio de 2009, 03:52 »
buenas tardes noches o dias segun su zona horaria, bueno pues tengo una duda estoy haciendo un trabajo para la prepa y en una ventan donde se muestra varios textbox y muestran la informacion de una base de datos de access logro que el boton buscar funcione mientras todos los textbox estan bloqueados y al momento de presionar el boton editar se desbloquean para editarlos pero cuando presiono el boton guardar me marca el error de "La operacion no esta permitida si el objeto esta cerrado".

este es el codigo del boton, alguien me puede decir donde esta el error? se lo agradeceria mucho


Private Sub cmdguardar_Click()
If txtFOLIO.Text = "" Then
MsgBox "Falta el numero de folio", vbExclamation, "Error"
txtFOLIO.SetFocus
Else
If txtDEPARTAMENTO.Text = "" Then
MsgBox "falta el departamento", vbExclamation, "Error"
txtDEPARTAMENTO.SetFocus
Else
Mantenimiento.rsDatos.Update
MsgBox "El registro fue guardado satisfactoriamente.", vbInformation, "Exitoso"
End If
End If

End Sub

Páginas: [1]