var fso = new ActiveXObject('Scripting.FileSystemObject');
var wsh = new ActiveXObject('WScript.Shell');
var f = wsh.ExpandEnvironmentStrings('%userprofile%');
DOpus.Output(fso.GetFolder(f).Path);
DOpus.Output(fso.GetFolder(f).ShortPath);
var f = wsh.ExpandEnvironmentStrings('%temp%');
DOpus.Output(fso.GetFolder(f).Path);
DOpus.Output(fso.GetFolder(f).ShortPath);