OVH Cloud OVH Cloud

impression tres aleatoire

1 réponse
Avatar
sam
Bonjour,

j'ai dix fichiers html a imprimer
je cree une boucle qui affiche le fichier dans un
webbrowser et apres j'execute l'impression :

For k = 1 To Form7.Text1
Form7.WebBrowser1.Navigate "c:\tmp" & k & ".htm"
Form7.WebBrowser1.ExecWB OLECMDID_PRINT,
OLECMDEXECOPT_DONTPROMPTUSER, 1, Empty
Kill "c:\tmp" & k & ".htm"
Next

mais les fichiers sortent dans le desordre savez vous
pourquoi?

1 réponse

Avatar
François Picalausa
Bonjour/Soir,

Il ne faudrait pas exécuter ce genre de boucles avec un webbrowser; c'est
déjà bien, avec ce genre de boucle, s'il sort toutes les pages :-(
Le post suivant montre comme l'implémenter plus proprement:
http://groups.google.com/groups?threadm=eYsPMLgyDHA.3156%40TK2MSFTNGP11.phx.gbl

En outre, un doevents après
Form7.WebBrowser1.ExecWB OLECMDID_PRINT, ...
ne pourra pas faire de mal.

Tu peux surveiller la liste des tâches d'impressions voir si les tâches sont
ajoutées dans le bon ordre ou non.
--
François Picalausa (MVP VB)
FAQ VB : http://faq.vb.free.fr
MSDN : http://msdn.microsoft.com

"sam" a écrit dans le message de
news:5b3a01c3e5ad$7bb6b420$
je cree une boucle qui affiche le fichier dans un
webbrowser et apres j'execute l'impression :

For k = 1 To Form7.Text1
Form7.WebBrowser1.Navigate "c:tmp" & k & ".htm"
Form7.WebBrowser1.ExecWB OLECMDID_PRINT,
OLECMDEXECOPT_DONTPROMPTUSER, 1, Empty
Kill "c:tmp" & k & ".htm"
Next

mais les fichiers sortent dans le desordre savez vous
pourquoi?