//********************************************************************
// Copymiddle 2006 Zealic,All middle keeped.
//********************************************************************
//** 环境变量名
//** 设置环境变量名,这些值影响环境变量的名字,建议不要修改
var VN_PATH = "PATH";
var VN_PROFILE = "PROFILE";
var VN_PROFILE_USER = "PROFILE_USER";
var VN_VOLATILE_PROFILE = "VOLATILE_PROFILE";
var VN_TEMP = "TEMP";

//********************************************************************
//** 设置
var m_Prefix = "GUEST_";
var m_UserName = "Zealic";
var m_Profile = "D:\\Profile";
var m_VoltProfile = "F:\\VolatileProfile";
var m_UserPath = "C:\\WINDOWS\\Microsoft.NET\\Framework\\v2.0.50727;"
+ "D:\\Java\\JRE\\Currently\\bin";
//调用函数以设置
SetEnvironment(m_Prefix,m_UserName,m_Profile,m_VoltProfile,m_UserPath);

//********************************************************************
//** 函数定义
// 设置环境变量
// prefix : 环境变量名的前缀
// userName : 用户名
// profile : 重要文件目录
// voltProfile : 非重要文件目录
// userPath : 用户 Path,设置该值以进行快捷运行程序
function SetEnvironment(prefix,userName,profile,voltProfile,userPath)
{
//开始设置
var currentName;
//===========================
// 设置系统重要目录
currentName = prefix + VN_PROFILE;
SetSystemValue(currentName, profile);
// 设置设置用户重要目录
currentName = prefix + VN_PROFILE_USER;
SetSystemValue(currentName, "%" + prefix + VN_PROFILE + "%\\" + userName);
// 设置设置系统非重要目录
currentName = prefix + VN_VOLATILE_PROFILE;
SetSystemValue(currentName, voltProfile);
// 设置设置用户非重要目录
currentName = prefix + "VOLATILE_PROFILE_USER";
SetSystemValue(currentName, "%" + prefix + VN_VOLATILE_PROFILE + "%" + "\\" + userName);
// 设置临时目录
currentName = prefix + "TEMP";
SetSystemValue(currentName, "%" + prefix + VN_VOLATILE_PROFILE + "%" + "\\Temporary");
//设置TEMP变量
var temp = "%" + prefix + VN_TEMP + "%";
SetUserValue("TMP", temp);
SetUserValue("TEMP", temp);
SetSystemValue("TMP", temp);
SetSystemValue("TEMP", temp);
// 设置 Path 和 自定义 Path 连接
var currentName = prefix + VN_PATH;
SetSystemValue(currentName, userPath);
// 检测是否已经存在Path,如果不存在则设置
var regValue = new RegExp("%" + prefix + VN_PATH + "%","i");
if(!regValue.test(GetSystemValue("Path")))
{
SetSystemValue("Path",GetSystemValue("Path") + ";%" + prefix + VN_PATH + "%");
}
}
// 调试用函数
function Debug(msg)
{
wsh = new ActiveXObject("WScript.Shell");
wsh.Popup(msg);
}
// 获取用户环境变量
function GetUserValue(name,value)
{
wsh = new ActiveXObject("WScript.Shell");
return wsh.Environment("user").Item(name);
}
// 设置用户环境变量
function SetUserValue(name,value)
{
wsh = new ActiveXObject("WScript.Shell");
wsh.Environment("user").Item(name) = value;
}
// 删除用户环境变量
function RemoveUserValue(name)
{
wsh = new ActiveXObject("WScript.Shell");
wsh.Environment("user").Remove(name) = value;
}
// 获取系统环境变量
function GetSystemValue(name,value)
{
wsh = new ActiveXObject("WScript.Shell");
return wsh.Environment("system").Item(name);
}
// 设置系统环境变量
function SetSystemValue(name,value)
{
wsh = new ActiveXObject("WScript.Shell");
wsh.Environment("system").Item(name) = value;
}
// 删除系统环境变量
function RemoveSystemValue(name)
{
wsh = new ActiveXObject("WScript.Shell");
wsh.Environment("system").Remove(name) = value;
}