OVH Cloud OVH Cloud

Timer ?

2 réponses
Avatar
fabienne HUÏEZ
Bonjour =E0 tous,

Dans une base de donn=E9es stockant des articles de presse,=20
j ’ai un formulaire qui me permet de rechercher=20
tous les articles contenant un certain mot.

Je saisis le mot =E0 rechercher dans une zone de texte et je=20
clique sur le bouton [Lancer la recherche]

Le curseur se transforme alors en sablier le temps de la=20
recherche.

Je voudrais faire un bouton [Annuler] pour interrompre =20
la recherche en cas de faute de frappe, par exemple.
MAIS COMMENT FAIRE POUR DETECTER LE CLIC SUR CE BOUTON=20
ALORS QU’UNE PROCEDURE EST EN COURS ?

J’ai entendu parler de =AB Timer =BB mais je ne parviens pas=20
=E0 adapter les exemples trouv=E9s sur le forum =E0 mon cas=20
pr=E9cis.

Merci de m’indiquer une piste pour d=E9marrer.
fabienne

2 réponses

Avatar
Ze titi
Bonjour,

il me semble que, durant l'exécution d'une requête, la séquence de
touches "Ctrl+Pause" peut la stopper. Avec un sendkeys, ça devrait
fonctionner.



fabienne HUÏEZ wrote:

Bonjour à tous,

Dans une base de données stockant des articles de presse,
j ’ai un formulaire qui me permet de rechercher
tous les articles contenant un certain mot.

Je saisis le mot à rechercher dans une zone de texte et je
clique sur le bouton [Lancer la recherche]

Le curseur se transforme alors en sablier le temps de la
recherche.

Je voudrais faire un bouton [Annuler] pour interrompre
la recherche en cas de faute de frappe, par exemple.
MAIS COMMENT FAIRE POUR DETECTER LE CLIC SUR CE BOUTON
ALORS QU’UNE PROCEDURE EST EN COURS ?

J’ai entendu parler de « Timer » mais je ne parviens pas
à adapter les exemples trouvés sur le forum à mon cas
précis.

Merci de m’indiquer une piste pour démarrer.
fabienne


--
Voilou,

@+,
Titi

Avatar
Gilbert
Bonjour,
Pour arreter l'exécution d'une boucle assez longue, j'ai utilisé un test sur
l'appui de la touche Echap avec le code suivant :
Dans un module :
Public Declare Function apiGetAsyncKeyState Lib "user32" Alias
"GetAsyncKeyState" (ByVal vKey As Long) As Integer

Dans ton formulaire :

For i = 1 To 1000000
Au début de la boucle je teste
If Cancel = True then
Exécution de la boucle
If apiGetAsyncKeyState(vbKeyEscape) Then Cancel = True
Else
Sortie de la boucle avec
Exit For (ou autre)
End If
Next i

Cordialement

Gilbert

"fabienne HUÏEZ" a écrit dans le message
de news:115ac01c44181$5f69eaa0$
Bonjour à tous,

Dans une base de données stockant des articles de presse,
j ’ai un formulaire qui me permet de rechercher
tous les articles contenant un certain mot.

Je saisis le mot à rechercher dans une zone de texte et je
clique sur le bouton [Lancer la recherche]

Le curseur se transforme alors en sablier le temps de la
recherche.

Je voudrais faire un bouton [Annuler] pour interrompre
la recherche en cas de faute de frappe, par exemple.
MAIS COMMENT FAIRE POUR DETECTER LE CLIC SUR CE BOUTON
ALORS QU’UNE PROCEDURE EST EN COURS ?

J’ai entendu parler de « Timer » mais je ne parviens pas
à adapter les exemples trouvés sur le forum à mon cas
précis.

Merci de m’indiquer une piste pour démarrer.
fabienne