Bonjour,
J'ai un petit souci avec ma gestion de la progression de l'exécution de mon code.
J'autilise une page HTML pour afficher la sortie standard d'un script de la manière suivante:
Set oExec = shell.Exec("cscript.exe " & Chr(34) & ".\create_groupe_v2.vbs" & Chr(34) & " " & Chr(34) & travail(i) & Chr(34) & " //NoLogo" )
While oExec.Status = 0
If Not oExec.StdOut.AtEndOfStream Then 'text = text & oExec.StdOut.Read(1)
char = oExec.StdOut.Read(1)
If char <> "" Then
If char = vbCR Or char = vbLF Then char = "<BR>" & vbCRLF
text = text & char
End if
End If
oIE.Document.Body.InnerHTML = HTML & "Création des groupes de " & travail(i) & " (" & Now & " )<BR>" & text
Wend |
Comme vous pouvez le voir, il y a un affichage de l'heure courante. On voit bien que les secondes défilent tranquillement tant qu'il y a une activité sur la sortie standard mais malheureusement, le script lancé fait un
pour attendre que les controleurs de domaine se répliquent correctement.
Et là, mon affichage se met en attente, les secondes ne défilent plus du tout. Etant donné les lignes de codes indiquées plus haut, je m'attendait à voir ma page HTML clignoter comme une folle avec les secondes qui défilent mais non, tout reste figé!!! Pendant 20 minutes...
Quelqu'un aurait-il une explication à cet étrange phénomène???
Dans l'attente de vos lumières.
Daroylan.
Un OS pour les gouverner tous, un OS pour les trouver,
Un OS pour les amener tous et dans les ténèbres les lier
Au pays de Redmond où s'étendent les Ombres.