Djons
Цитата:
Эта конструкция ничего не дала
|
Странно, должна была прописаться переменная... вот вроде рабочий вариант:
Код:

$AllDrivesVar = DriveGetDrive("all")
For $i = 1 to $AllDrivesVar[0]
If $AllDrivesVar[$i] <> "a:" And $AllDrivesVar[$i] <> "b:" And FileExists($AllDrivesVar[$i] & "\PROGPE.WIM") Then
RegWrite("HKLM\SYSTEM\ControlSet001\Control\Session Manager\Environment", "Path", "REG_EXPAND_SZ", $AllDrivesVar[$i] & "\;" & EnvGet("Path"))
RegWrite("HKCU\Environment", "Path", "REG_SZ", $AllDrivesVar[$i] & "\;" & EnvGet("Path"))
EndIf
Next
EnvUpdate()
Последняя строка предназначена для обновления переменных сред.