Script VBS + message d'attente

Script VBS + message d'attente - VB/VBA/VBS - Programmation

Marsh Posté le 19-03-2009 à 12:34:41    

Bonjour,  
 
J'ai réaliser un script en vbs qui lit dans un répertoire le contenu de tous les fichier.
 
Chaque fichier contient un chiffre
 
Le script fait donc la somme. Il y'a énormément de fichier à traiter et pendant ce traitement il ne se passe rien visuellement. Donc on ne sait pas si le script à planter ou si on l'a bien lancer.
 
Je voudrais faire en sorte qu'un message du type "Patienter, calcul en cours" s'affiche pendant la durée du traitement, puis disparaisse une fois la boucle de calcul terminé.
 
Comment puis-je faire ?

Reply

Marsh Posté le 19-03-2009 à 12:34:41   

Reply

Marsh Posté le 19-03-2009 à 12:55:21    

Si l'on sait à l'avance combien de temps va durer le traitement, il est possible d'afficher un message qui disapraitra au bout du temps donné, par exemple :

Set objShell = WScript.CreateObject("WScript.Shell" )
objShell.Popup "Plus que dix secondes", 10


Si on ne connait pas la durée du traitement à l'avance, alors il faut utiliser les techniques mises en oeuvre pour les barres de progression (google : "VBScript progressbar" ). Un exemple parmi d'autres : http://www.visualbasicscript.com/m_24746/tm.htm

Reply

Marsh Posté le 19-03-2009 à 15:10:30    

Merci pour la réponse, cependant :

 

Pour la première solution, ça affiche bien un message pendant 10 secondes, mais pour autant la boucle de calcul ne s'exécute pas pendant ce laps de temps, mais après donc c'est pas bon.

 

Quand à la secondes solution je n'arrive pas à la mettre en oeuvre. En fait je ne passe pas par une interface web, c'est juste un script autonome.

 

Une autre piste peut-être ?


Message édité par antolionux le 19-03-2009 à 15:11:28
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed