Bonjour à tous,

Je me permets de demander votre aide pour un script qui parcours ma base de registre.

Ce script fonctionne en .vbs, mais je n'arrive pas à l'intégrer dans mon HTA, j'obtiens une erreur :
Objet requis : Wscript
Voici le script en question :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
		Const HKEY_LOCAL_MACHINE = &H80000002
 
 
		strComputer = "."
 
		Set oReg=GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & _ 
		    strComputer & "\root\default:StdRegProv")
 
		strKeyPath = "SOFTWARE\Logiciel\"
 
		oReg.EnumValues HKEY_LOCAL_MACHINE, strKeyPath, _
		    arrValueNames, arrValueTypes
 
		For i=0 To UBound(arrValueNames)
		    Wscript.Echo "Value Name: " & arrValueNames(i)  
		Next
C'est la ligne 14 qui pose problème, avec le UBound.

Pourriez-vous m'aider ?

Je vous remercie.