Consulta sobre código de access para eliminar un registro de la tabla de la base de datos

Cuando hago la siguiente instrucción:
DoCmd. RunCommand acCmdDeleteRecord
El programa me da un mensaje:
"Está a punto de eliminar un registro, ..."
Yo este mensaje no quiero que me aparezca, bien porque quiero poner uno mio, o porque no quiero poner nada. ¿Habría alguna manera?
Respuesta

Personas como usted hacen grande la web

Bendiciones

1 respuesta más de otro experto

Respuesta
1
Si que es posible evitar este mensaje, y por contrario indicar uno tuyo...
if msgbox("¿Está seguro de eliminar el registro seleccionado?",vbQuestion+vbYesno,"Eliminación de datos")=vbyes then
'Evitar que Access muestre mensajes..
docmd.SetWarnings false
'Eliminar el registro..
DoCmd.RunCommand acCmdDeleteRecord
'Volver a estado actual de Access
DoCmd.SetWarnings True
end if
También sería posible que indicaras código en el evento Antes de Confirmar la Eliminación...
Private Sub Form_BeforeDelConfirm(Cancel As Integer, Response As Integer)
response=0 'Desactiva SetWarnings
if msgbox("¿Desea eliminar el registro?",vbCritical + vbyesno,"Eliminación de Datos")=VbNo then
Cancel=true
Exit sub
End if
End Sub
El código DoCmd. RunCommand acCmdDeleteRecord debe estar por ejemplo en un botón...
Saludos.
Jordi Pérez i Madern
Mataró (Barcelona)

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Eliminando registro actual en formulario access.

Tengo una imagen a la cuál le asigné: Private Sub Imagen1082_Click() DoCmd.RunCommand acCmdDeleteRecord End Sub El funciona, pero quiero que además no me salga un error que da cuando en ves de aceptar para eliminar cancelo la operación, y...
2 respuestas

Msgbox vbYesNo creado pero me sale el original

Pues hice en un cuadro combinado en la opción ·al no estar en la lista" un código que crea un msgbox y me sale todo bien, pero también me aparece el TÍPICO msgbox de access que dice "que el elemento no esta en la lista..." No quiero que aparezca y...
1 respuesta

Código para pasar registro a Tabla Histórico

Tengo una tabla de material, donde he creado un botón con el siguiente código: Private Sub Imagen789_Click() Dim respuesta As String Dim cSql As String respuesta = MsgBox("ELIMINARÁ EL REGISTRO ACTUAL,¿DESEA CONTINUAR?", vbYesNo, "CONFIRMAR") If...
2 respuestas

Actualizar un campo de una tabla

Estoy intentando modificar el campo histórico de la tabla definiciones cuando en el formulario le doy a eliminar, no me da ningún error pero no me actualiza el campo histórico, me lo deja como esta. Lo estoy haciendo así: Dim db As Database Dim rs As...
1 respuesta

Problema con eliminar registro VBA

Tengo un problema para eliminar registros en un formulario desde un código vba El tema es así: Tengo dos tablas (Altas) y (Bajas) vinculadas por el campo Id A con relación 1 a varios. Tengo un formulario principal basado en la tabla altas con un...
1 respuesta

Eliminar registro de un subformulario

Tengo un formulario A cuyo origen es una tabla A y que incluye un subformulario B que apunta a una tabla B. Cuando el subformulario B recibe el enfoque genera un nuevo registro en esa tabla B. Tengo el típico botón de "Cancelar" para que cuando se...
1 respuesta

Eliminar avisos de advertencia en VBA Access

Le escribo desde Bogotá Colombia, para pedirle el favor de que me ayude con lo siguiente: Como hago para que en Access no me aparezca el incomodo aviso que le dice al usuario que va a insertar o eliminar un registro, ¿Al darle click a un botón para...
3 respuestas

Eliminar registros duplicados mediante una función

Me gustaría crear una función para eliminar registros duplicados en cualquier formulario. Realmente cada registro es único porque en el campo ID es diferente el valor, pero entiendo por duplicados aquellos registros cuyo todos los campos, excepto ID...
2 respuestas

Control de campos obligatorios

Con el fin de controlar que los campos obligatorios en un formulario sean diligenciados por los usuarios, en el evento antes de catualizar del formulario coloque el siguiente código: Private Sub Form_BeforeUpdate(Cancel As Integer) If Nz(Me.Nit, "")...
1 respuesta

Al cerrar formulario access revisar si ciertos campos están cubiertos

Tengo un formulario donde ingreso los registros y cuando acabo hago click en el botón salir y como access guarda los registro por defecto solo le puse con codigo que cierre el formulario. Pero necesito que me compruebe que el campo Fecha y Acción...
1 respuesta