Sbloccare DB (Back end) aperto da un altro utente che ha lasciato il FE aperto

Question

Salve,

purtroppo mi sono trovato nella condizione di non poter aggiornare una tabella di un DB "back end" in quanto un utente ha lasciato il suo FE aperto e, purtroppo, non è contattabile.

Il file BE si trova su un server ed è condiviso tra tutti gli utenti del FE. I FE sono

Ho provato a cancellare il file .ldb, ma purtroppo il sistema mi impedisce di farlo in quanto risulta in uso da un'altra applicazione.

C'è un modo per "buttare fuori tutti gli utenti" all'occorrenza da parte mia?

Spero possiate darmi una mano.

Grazie in anticipo.

Saluti.

Answer 1

Ciao Salvatore,

Se il Be è su un server vedi questo articolo: Chiudere una risorsa o un file aperto

Ovviamente è un'azione drastica, infatti la chiusura brutale del Front End potrebbe rovinare il Back end.

Per il futuro potresti creare una tabella sul Be con un campo, poi creare una maschera nel front end che rimarrà nascosta e a intervalli regolari ad esempio 1 o 2 secondi andrà ad interrogare la tabella sul Be, se troverà un determinato valore da te scelto allora chiuderà il Fe.

Ovviamente tutti i Fe distribuiti agli utenti devono avere questo meccanismo.

Ciao

Giorgio Rancati

Answer 2

Perfetto!

Tutto funziona alla grande.

Grazie mille.

Saluti.

Salvatore Valenza.

Answer 3

Ciao Salvatore,

un metodo potrebbe essere questo:

1. Crea un file con il blocco note contenente questa istruzione:

    MsgBox "L'applicazione è stata chiusa per manutenzione",0,"Titolo messaggio"

2. Salvalo nella stessa cartella del FE  e rinominalo in: MessaggioChiusura.Vbs
3. Crea in un modulo Bas del Fe la seguente funzione:

  Public Function Chiudi_Access() As Variant

         Dim wsh As Object

         Set wsh = CreateObject("WScript.Shell")

         wsh.Run CurrentProject.Path & "\MessaggioChiusura.vbs"

         Set wsh = Nothing

         Application.Quit

   End Function

4. Dalla macro della maschera nascosta esegui la funzione per chiudere Access con l'azione "Esegui Codice" mettendo nel parametro "Nome Funzione" Chiudi_Access()

Ciao

Giorgio Rancati

Answer 4

Grazie mille... Non ci avevo pensato... Con un paio di macro (col codice non sono bravissimo) e una maschera sono riuscito ad ottenere il risultato.

Solo un altro quesito (non so se devo aprire un'altra discussione):

c'è un modo per far aprire una finestra windows che rimanga aperta anche dopo la chiusura del DB, che avverta l'utente che l'applicativo è stato chiuso e che ?

Grazie ancora.

Salvatore Valenza.

Answer 5

Salve. Non ho ricevuto nessuna risposta. Serve qualche informazione aggiuntiva?