Spring

环境变量有三个类型，
第一种，可能是大家修改的最多的，是全局的系统环境变量，对所有用户生效，称为 SYSTEM，
第二重，是我自己用的最多的，用户环境变量，仅对当前登录用户生效，称为 USER，
第三种，是程序运行时环境变量，仅在程序还活着的时候有效，称为PROCESS。

其中前面两种是能看见的，就是在电脑属性的高级设置里面，环境变量那一页，
上面那框是用户环境变量，下面那框是系统环境变量；
第三种看不见，并且在程序启动后不能从外部修改，只能运行的那个程序自己控制，
程序启动时默认加载，系统环境变量和用户环境变量的并集。

Dim ws : Set ws = CreateObject("WScript.Shell")

' 查看环境变量
WScript.Echo "此脚本运行时环境变量 PATH 值：" & vbCrLf & ws.Environment("Process")("PATH")
WScript.Echo "用户环境变量 PATH 值：" & vbCrLf & ws.Environment("User")("PATH")
WScript.Echo "系统环境变量 PATH 值：" & vbCrLf & ws.Environment("System")("PATH")


' 设置环境变量
' 修改运行时的环境变量
ws.Environment("Process")("天王盖地虎") = "宝塔镇河妖"
ws.Run "cmd /c echo %天王盖地虎% & pause", 1, True


' 将桌面添加到用户环境变量 PATH 
ws.Environment("User")("PATH") = ws.Environment("User")("PATH") & ";%USERPROFILE%\Desktop"
' 启动程序时继承父程序的环境变量，
' 修改用户变量和系统环境变量都需要重启程序才生效，
' 因此已经在运行的程序读取不到新添加的path
ws.Run "cmd /c echo %path% & pause", 1, True

' 注意：修改系统环境变量需要管理员权限
' 将 E: 添加到系统环境变量 PATH 
ws.Environment("System")("PATH") = ws.Environment("System")("PATH") & ";E:"
复制代码