[access] proteger .mdb

[epa2]

hola de nuevo... este código lo que hace es que cuando carga un FORMULARIO mostrar un msgbox que se cierra solo....

con cambiar algunas líneas pienso que se podría cerrar la aplicación sola cada x segundos...

Option Compare Database

Public i As Integer

Private Sub Form_Load()
i = 5
End Sub

Private Sub Form_Timer()
If i <> 0 Then
i = i - 1
Me.Etiqueta1.Caption = "Me voy a cerrar en " & i & " Segundos"
Else
DoCmd.Close acForm, Me.Name
End If
End Sub