Log d'un VBS dans une fenêtre - VB/VBA/VBS - Programmation
Marsh Posté le 23-10-2005 à 15:50:17
Fred_l a écrit : Bonjour, |
Bon n'ayant pas de réponse et pour ceux que ça intéresse, je me suis orienté vers la solution Internet Explorer :
Dim Ie ' Appli InternetExplorer
Dim Console ' Fichier de réponse html
Dim LogEvent ' Nom du fichier de suivi du script (.HTML)
Dim FileRepInet ' Repertoire des fichiers Intarnet
LogEvent = "Console.html"
FileRepInet = "C:\WWW\Intranet\"
Set Ie=WScript.CreateObject("InternetExplorer.Application" )
Ie.Visible=True
Ie.Top=10
Ie.Height=500
Ie.Width=500
Ie.Navigate FileRepInet&LogEnvent
Ie.MenuBar=False
Ie.AddressBar=False
Ie.Resizable=False
Set Console =Fso.CreateTextFile(FileRepInet&LogEvent)
Console.Write "<HTML><BR>"
Console.Write Time & "'--- Première écriture <BR>"
Ie.Refresh
Blablabla Suite du Programme
Console.Write Time & "'--- Deuxième écriture <BR>"
Ie.Refresh
Blablabla Suite du Programme
Console.Write Time & "'--- Troisième écriture <BR>"
Ie.Refresh
Blablabla Suite du Programme
Console.Write "</HTML>"
Console.close
Ie.Quit
Ainsi j'ai une fenêtre Ie ou je peux suivre mon VBS pas pas tel un débuger même si pour ma part c'est que mon VBS dure longtemps et que je voulais savoir ce qu'il faisait et où il en était....
Bon je sais qu'il doit y avoir mieux...
M'enfin ça marche bien comme ça aussi sans prise de tête...
Même si je me suis un peu pris la tête quand même !
@+ Fred
Marsh Posté le 22-10-2005 à 13:09:05
Bonjour,
J'ai un Programme en VBS, mais celui-ci dure assez longtemps,et je voudrais pouvoir suivre celui-ci pas à pas dans une fenêtre.
Une sorte de log en temps réel..
Mais je ne vois pas comment faire ni quels objets utiliser pour demander à la fenêtre d'afficher ce que je veux....
Si quelqu'un à une petite idée...
Fred