[HTA]Problème de chemin du registre sur regWrite
Bonjour,
Le but du script est d'écrire un path dans le registre en fonction des sélections de l'utilisateur sur les boutons radios. Mais voilà quand j'essaie d'écrire dans le registre par exemple la clef "test.exe" le debugger m'indique que la "Racine incorrecte dans le clé du registre", pourtant le chemin est le bon... + system: accès refusé (à la ligne 39)
Test sur un poste Windows7 x64.
Merci de vos éclaircissements.
Cordialement
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
| <html>
<head>
<title>Pbm iTunes CA</title>
<HTA:APPLICATION
APPLICATIONNAME="Conflits Apple et CA"
ID="1"
VERSION="1.0"
/>
</head>
<script language="VBScript">
'***********************************************************************
'Option Explicit
On Error Resume Next
'**************************************************
Const CLEF_iTunesW7="HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\Test.exe\"
Const CLEF_iTunesXP=""
Const CLEF_UtilConfigXP=""
Const CLEF_UtilConfigW7=""
Const CLEF_SynchXP=""
Const CLEF_SynchW7=""
Dim WshShell
Set WshShell = CreateObject("WScript.Shell")
'******Actions Modifs registre*****************************
Sub BoutonModif_OnClick
Dim Bouton
'******Poste en W7*****************************
If BtPoste(0).Checked then
If BtRadio(0).Checked then
Bouton=BtRadio(0).value
MsgBox "PBM iTunes W7"
WshShell.RegWrite CLEF_iTunesW7,"Path2"
End If....................... |
