sniffff snifffff snifff

Merci kan meme de l'aide, mais j'y arrive toujours pas.
j'ai essaye pour mettre la valeur dans un formulaire en HTML :
<HTML>
<body>
<p><input type="text" name="Text1" size="20"></p>
</body>
<SCRIPT Language="VBScript">
const HKEY_LOCAL_MACHINE = &H80000002
strComputer = "."
Set oReg=GetObject("winmgmts:{impersonationLevel=impersonate}!\\" &_
strComputer & "\root\default:StdRegProv")
strKeyPath = "SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall"
oReg.EnumKey HKEY_LOCAL_MACHINE, strKeyPath, arrSubKeys
For Each subkey In arrSubKeys
msgbox subkey
Next
</SCRIPT>
</HTML>
Mais je sais pas le kel nom il faut donner a la zone de texte et si c'est bon.
Merci de m'aider
Bye