System environment variables

[pawelg]

Hi, it's my first post on this forum
Does anybody know if it's possible to get system variables in VBA script (in EA of course), like Environ("username")?
Thanks for your help.

[Aaron B]

You should be able to call ExpandEnvironmentStrings on the WScript.Shell object.
https://msdn.microsoft.com/en-us/library/dy8116cf(v=vs.84).aspx

Example:

Code: [Select]

'Expand Environment variables such as %TEMP% and %APPDATA%
function ExpandEnvironmentStrings(s)

dim WshShell, retval
retval = ""

set WshShell = CreateObject("WScript.Shell")
if not WshShell is nothing then
retval = WshShell.ExpandEnvironmentStrings(s)
end if

ExpandEnvironmentStrings = retval
end function

Session.Output(ExpandEnvironmentStrings("username=%username%"))

[pawelg]

Thank you