none
En Access 2003 y VBA como ejecuto una consulta de actualización sin que me pregunte? RRS feed

  • Pregunta

  • Estoy con mi base de datos y le estoy haciendo algunos formularios de modo que sea una aplicación.

    Una vez logueado con usuario y contraseña aparece la pantalla inicial, pero al abrirla quiero que revise un campo de una tabla y en base a una función definida por mi actualice otro campo de la misma tabla (si vamos al caso, que ponga en true o false un campo de alarma en base a si una planilla (tabla relacionada) cuya fecha va en otro campo lleva más de 1 mes sin ser actualizada)

    Asi que pongo en el evento open:

    Private Sub Form_Open(Cancel As Integer)
        lblUser.Caption = Usuario.ID
        Comando2.Enabled = Usuario.Admin
        DoCmd.RunSQL "UPDATE Equipos SET Equipos.Alarma4 = PlanillaVencida(Equipos!UltPlanillaInsp)"
    End Sub

    Actualiza bien al entrar pero previamente me sale un dialogo preguntando si deseo actualizar los registros. Me gustaría que actualice sin preguntar

    miércoles, 12 de mayo de 2010 12:30

Respuestas

  • Hola!

    Currentdb.Execute  "UPDATE Equipos SET Equipos.Alarma4 = PlanillaVencida(Equipos!UltPlanillaInsp)", dbFailOnError


    Saludos a todos desde Huelva http://www.mvp-access.es/emilio/
    • Marcado como respuesta Ismael Borche miércoles, 6 de abril de 2011 14:36
    miércoles, 12 de mayo de 2010 15:51

Todas las respuestas