Imprimir página | Cerrar ventana

CERRAR SESIONES DE USUARIOS

Impreso de: Foro de Access y VBA
Categoría: Access y VBA
Nombre del foro: Access y VBA
Descripción del foro: Foro de programacion en Access (Con código y sin código)
URL: http://www.mvp-access.com/foro/forum_posts.asp?TID=86942
Fecha de impresión: 26/Marzo/2026 a las 19:46


Tema: CERRAR SESIONES DE USUARIOS
Publicado por: ARTUROML
Asunto: CERRAR SESIONES DE USUARIOS
Fecha de publicación: 02/Junio/2024 a las 19:28
Hola a todos, hice una aplicación en access la cual será utilizada por varios usuarios de manera remota, sin embargo en determinado momento se tendrán que hacer mejoras o corregir errores, existe alguna manera de temporizar con un mensaje el cierre o cerrar las sesiones de los usuarios de manera remota para poder trabajar en la aplicación, ya que al haber usuarios conectados no permite hacer cambios.

Gracias




-------------
Gracias, Atte   AML



Respuestas:
Publicado por: Mihura
Fecha de publicación: 02/Junio/2024 a las 19:57
Hola Arturo, un saludo y bienvenido.

No hay nada implementado en Access que te permita hacer eso, otra cosa es que tú te lo puedas 'fabricar'. Unas ideas de cómo hacerlo:
- un campo en la BD que indique el cierre / prohibición de uso de la misma
- cuándo un usuario ingrese en la aplicación compruebas este campo y si así lo indica 'echas fuera' al usuario, con esto impides que entren / vuelvan a entrar cuando vayas a realizar mantenimiento
- ese mismo campo te servirá para 'echar' a los usuarios que estén dentro:
    · un formulario oculto con Timer que esté abierto permanentemente que compruebe ese valor, y cuándo este lo indique, aviso al usuario y a cerrar, o le das un tiempo para que cierre y si no lo hace le cierras automáticamente

Me da la impresión, tal cual describes el proceso, que los usuarios comparten un único front-end (y espero que no sea un único programa con las tablas incluidas). Si esto es así te recomiendo que cada usuario tenga un front-end propio, Access no lleva muy bien que digamos el uso re-entrante (varios usuarios ejecutando el mismo programa).




-------------
Jesús Mansilla Castells.
Saludos desde Móstoles.

http://www.accessaplicaciones.com" rel="nofollow - Access Aplicaciones
http://www.tecsys.es" rel="nofollow - Tecsys.es


Publicado por: javier.mil
Fecha de publicación: 03/Junio/2024 a las 22:37
Buenas , tengo una aplicación donde tengo programada la hora de cierre de la aplicación. Esto es sola una idea y a partir de aquí puedes adaptarlo según tus necesidades ...

Option Explicit

Const cCloseTime As String = "19:18:05"      
' << Hora de cierre la aplicacion



Private Sub Form_Load()

      Me.TimerInterval = 1000      
' << 1000 equivale a 1 segundo

End Sub



Private Sub Form_Timer()
      On Error GoTo Exit_Local




      If Time >= CDate(cCloseTime) Then
      
      DoEvents

            Me.lblMessage.Caption = "This Access database called" & vbNewLine & _
                                    CurrentDb.Name & vbNewLine & _
                                    "is CLOSING NOW for " & vbNewLine & _
                                    "Automatic Administration." & vbNewLine & _
                                    "The time is  " & Time()


            MsgBox "This Access database called" & vbNewLine & _
                   CurrentDb.Name & vbNewLine & _
                   "is CLOSING NOW for " & vbNewLine & _
                   "Automatic Administration." & vbNewLine & _
                   "The time is  " & Time()


            Application.Quit acQuitSaveAll

      End If




Exit_Local:

End Sub



-------------
https://www.accessdemo.info" rel="nofollow - https://www.accessdemo.info






Imprimir página | Cerrar ventana