afmelden + zandloper

[veerle55]

hallo nog eens aan het forum,

toen ik dacht dat het volledig af ging zijn
dacht ik nog aan iets

ik heb een afmeld-knop
deze sluit alle venster en opent terug het inlogvenster
wat ik wil is dat het programma "zogezegd" echt aan het afmelden is
en dat er een zandlopertje verschijnt en dat deze dan zogezegd
zijn tijd neemt om af te afmelden.
dan is het afmelden een beetje realistischer is vind.
hoe bouw ik dat in? deze codering in VBA staat er onder de knop "afmelden"
--------------------------------------------------------------------------------------------------------------------
Private Sub cmdAfmelden_Click()
On Error GoTo Err_cmdAfmelden_Click


Dim stDocName As String
Dim stLinkCriteria As String
DoCmd.Close
DoCmd.Close
stDocName = "frmInlogFormulier"
DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_cmdAfmelden_Click:
Exit Sub

Err_cmdAfmelden_Click:
MsgBox err.Description
Resume Exit_cmdAfmelden_Click

End Sub
---------------------------------------------------------------------------------------------------------------------

Dank

Mvg

Veerle

 

[veerle55]

of hoe sluit ik af na een bepaalde tijd?
bijvoorbeeld 5 seconden.
hoe voer ik dat in?

mvg

Veerle

 

[beheer25]

Afsluiten na 5 seconden doe je door de eigenschap "timer Interval" op 5000 in te stellen (milliseconden) en bij het onTimer event de afsluitcode te plaatsen.

Met "DoCmd.Hourglass = True" verander je de cursor in een zandloper.

Als je de applicatie echt wilt sluiten kun je dat doen met "docmd.quit"


Grtz,

 

[veerle55]

hoe maak ik het afhankelijk van een knop?
het is dat ik op een form 2 knoppen heb; ene
voor afmelden en ene voor afsluiten.
bij de afsluiten staat er docmd.quit
bij afmelden staat er 2 x docmd.close
hoe voor ik dat in voor de knop?
als ik dat doe gelijk jij het zegt dan
doet die dat ook voor het afsluiten, dat wil ik
niet, ik wil het alleen voor het afmelden.

Dank voor je reply

MVG

Veerle