;какой путь нужно дописать в переменную Path $addtopath=@ProgramFilesDir&"\7-Zip" ;извлечение текущего содержимого переменной Path $curpath=RegRead("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager\Environment","Path") ;если дописываемого пути нет в переменной Path, то дополняем ее If Not StringInStr ($curpath,$addtopath) and Not StringInStr ($curpath,"%ProgramFiles%\7-Zip") Then RegWrite("HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager\Environment","Path","REG_EXPAND_SZ",$curpath & ";" & $addtopath) EndIf