使用VBS脚本设置系统环境变量不重启

修改下列代码相应位置并保存为.vbs脚本

on error resume next 
set sysenv = CreateObject("WScript.Shell").Environment("user") 
'系统环境变量的数组对象Environment("user")或Environment("system")
sysenv.Remove("zm")        '删除变量zm
sysenv("zm")="%USERPROFILE%\桌面"       '添加变量zm
msgbox "添加成功！",64,"提示"