VBS et HTA, comment ça marche ?
Lors de vos diverses implémentations de scripts vous vous posez surement une question : comment les rendre plus interractifs ?
La réponse n’est pas simple, en effet, un script n’a nativement pas vocation à proposer une quelconque interraction et encore moins de façon graphique !
Tout ceci est vrai … enfin, si vous ne connaissez pas : le HTML Applicatif ou HTA !
Le HTA est un language de présentation (tout comme le HTML dont il en reprend la syntaxe) permettant l’exécution de scripts tels que des scripts VBS ou JavaScript.
Notons que contrairement au VBS qui s’appuie sur un hôte CScript ou WScript, le HTA s’appuie lui sur mshta.exe.
Passons maintenant à la pratique !
Retrouvez donc ci dessous un premier script VBS contenant l’ensemble des fonctions utilisées dans le second script qui lui est donc notre fameux script HTA.
Donc, le script VBS (nommé monscript.vbs):
'Script VBS Contenant les fonctions appellées par HTA
function hello
msgbox "Hello !!"
end function
function ExitHTA
self.close()
End function
function GetOSVersion
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colOperatingSystems = objWMIService.ExecQuery _
("Select * from Win32_OperatingSystem")
For Each objOperatingSystem in colOperatingSystems
Msgbox objOperatingSystem.Caption & " " & _
objOperatingSystem.Version
Next
End function
function TestSub
Msgbox textesaisi.Value
End function
Puis le Script HTA « MonSript.hta »(attention à l’appel à « monscript.vbs »):
CAPTION="yes"
SHOWINTASKBAR="yes"
SCROLL="no">
HTA Test d'intégration de VBS !
Manipulation de variables
Interrogations WMI
à vous de jouer !