Discussion :

[dpie]

tu fais un formulaire qui s'ouvre en invisible, avec un compteur toutes les 5 minutes par exemple.

Comment faire un compteur ttes les 5 minutes tout en laissant la main le reste du temps...

[Admin]

Evenement timer du formulaire, avec un timerinterval à 300000 (5 * 60000 millisecondes)

[Tofalu]

N'oublies pas qu'il y a un tutoriel la dessus écrit par Maxence Hubiche

[petitmushu]

au lieu de créer un fichier sur le serveur tu peux aussi simplement créer une table "FERME" dans access avec un booléen oui/non dedans. toutes les X minutes tu testes sur ce formualire invisible la valeur du champ dans FERME, si c'est oui => CASSOS pour touti !

Bonjour je reviens sur ce poste un peu daté mais qui me serait bien utile si j'arrivais à l'appliquer :
j'ai créé la table avec le booléen oui/non et un formulaire associé avec le timer à intervalle 5000 puis j'ai crée le module suivant : mais quand je coche rien ne bouge tout le monde reste connecté (sachant que tout le monde a un profil admin...)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Private Sub Form_Timer()
On Error GoTo Err_LogOffChk
Dim Lancer As Boolean
Dim rcd As DAO.Recordset
Set rcd = CurrentDb.OpenRecordset("Administration")
rcd.MoveFirst
Lancer = rcd.Fields(0)
rstLO.Close
CurrentDb.Close
 ' --Si la case est cochée
If Lancer Then Application.Quit acQuitSaveAll
Exit_LogOff:
   Exit Sub
Err_LogOffChk:
   MsgBox Err.Number & vbCrLf & Err.Description, vbInformation, "Erreur"
   Resume Exit_LogOff
End Sub