Получение переменных окружения в классическом ASP

Ответ 1

Вы можете использовать метод ExpandEnvironmentStrings объекта WScript.Shell для извлечения переменных среды. Следующий код присваивает значение переменной среды PATH переменной myPath:

set foo = createobject("WScript.Shell")
myPath = foo.ExpandEnvironmentStrings("%PATH%")

Дополнительная информация о объекте Shell как MSDN

Изменить: нужно было изменить переменную, которой назначен объект оболочки.

Ответ 2

Следующие работали для меня на основе этой статьи

Set objWSH =  CreateObject("WScript.Shell")
'This actually returns all the User Variables, and you either loop through all, or simply print what you want
Set objUserVariables = objWSH.Environment("USER") 
MsgBox(objUserVariables("TEMP"))

'This returns all the System Variables, and you either loop through all, or simply print what you want
Set objSystemVariables = objWSH.Environment("SYSTEM")
MsgBox(objSystemVariables("PATH"))