找回密码
 加入
搜索
查看: 971|回复: 0

如何不注消就使'HKEY_LOCAL_MACHINE\-\Environment'更改有效

[复制链接]
发表于 2009-8-20 19:44:34 | 显示全部楼层 |阅读模式
本帖最后由 Nonenever 于 2009-8-20 20:01 编辑

下面的代码,重启 ,注消,或 系统属性-》高级-》环境变量-》Path 确定一下就可以起作用
不知道有没有其他办法,不注消就有效
$PlusPath=@ScriptDir
$SYSEnvironmentPATH = RegRead('HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager\Environment', 'Path')

If StringRight($SYSEnvironmentPATH, 1) <> ';' Then
$SYSEnvironmentPATH = $SYSEnvironmentPATH & ';'
EndIf
If StringInStr($SYSEnvironmentPATH, $PlusPath) == 0 Then
$SYSEnvironmentPATH=$SYSEnvironmentPATH & $PlusPath
RegWrite('HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager\Environment', 'Path', 'REG_EXPAND_SZ', $SYSEnvironmentPATH)
EndIf
以下方法均无效
Run("gpupdate /force", "", @SW_HIDE)
#include <ACN_MISC.au3>
_Refreshicon()
DllCall("user32.dll","int","SendMessageTimeout","hwnd",65535,"int",26,"int",0,"int",0,"int",0,"int",1000,"str","dwResult")
Do 
        ProcessClose("explorer.exe")
Until Not ProcessExists("explorer.exe")
Run("gpupdate /force","",@SW_HIDE)
下面的方法有效
EnvUpdate ( )
;更新环境变量

评分

参与人数 1金钱 +5 贡献 +5 收起 理由
afan + 5 + 5 记下

查看全部评分

您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-5-17 15:57 , Processed in 0.075125 second(s), 24 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表