Access 97 - Pause

Hallo, kann mir jemand helfen?
Ich habe in Access97 folgende Procedure

Dim stDocName As String
Dim stLinkCriteria1, stLinkCriteria2, stLinkCriteria3 As String
>>diverse Befehle>diverse Befehle

Hallo, kann mir jemand helfen?

Hallo Ortwin, vermutlich ja :smile:

Wie kann ich die Pause in der Procedure bekommen ?

Eine Möglichkeit wäre eine entsprechende Schleife:
For x = 1 to 500000
'warte
next x

oder für eine echte zeitabhängige Warteschleife kannst du die Funktion DATEDIFF verwenden.

Grüße aus Schönberg (Lübeck)
Wolfgang
(Netwolf)

Hallo

Dim stDocName As String
Dim stLinkCriteria1, stLinkCriteria2, stLinkCriteria3 As String
‚‘’’’’’’ >>diverse Befehle>diverse BefehleDim x As Double, s As Double
s = 5#
x = Timer
Do Until Timer > x + s
Loop

Me![OK] = „“

Viele Grüße vom Bodensee
Franz , DF6GL

PS: Feedback erwünscht!

Erst mal vielen Dank für die schnelle Antwort
Ist Super der Timer funktioniert, aber irgendwie geht’s genau verkehrt herum.

Es soll erst schreiben „Suche erfolgreich!“ und nach 5 Sekunden diesen Text wieder löschen!
Die Procedure löscht, aber gleich und wartet dann 5 Sekunden!

Gruß Ortwin

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

Hallo,

schreib mal so:
.
.
Do Until Timer > x + s
Doevents
Loop
.
.

Super es funktioniert „Doevents“ hat’s gebracht.
Ich danke nochmals allen für die schnelle Hilfe.

Gruß Ortwin!

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]