Discussion :

[vbcasimir]

Bonjour

J'ai le code suivant

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Dim ws,T_VALEUR,T_MSA 
 
Set ws = WScript.CreateObject("WScript.Shell")
T_VALEUR = ws.RegRead ("HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Control\Session Manager\Environment\Path")
T_MSA = "C:\oracledatameal\app\product\11.2.0\client_1\bin;" & T_VALEUR
 
WScript.echo T_MSA   ' <= l'affichage de la variable est correcte
 
'// l'écriture ne se fait pas 
 
ws.RegWrite "HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Control\Session Manager\Environment Path",T_MSA , "REG_EXPAND_SZ"

Mon problème est que la mise à jour dans la base de registre de la chaine " Path" ne s'exécute pas, la variable T_MSA retourne bien la concaténation.

Pourriez-vous me renseigner

Je vous remercie

[Cachlab]

Bonjour,

Avant d'aller plus loin, j'ai remarqué qu'il manque un \ dans ton code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ws.RegWrite "HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Control\Session Manager\Environment\Path",T_MSA , "REG_EXPAND_SZ"

++

[vbcasimir]

effectivement il manque le "\" je suis étourdi.

Je te remercie

bonne journée