// (c)2008 by ibi, adds BLAH_group and BLAH_user with BLAH_password
// exec only in non-gui mode

// variable definition (do not change these ones until you know what you're doing.)
var wsh = new ActiveXObject("WScript.Shell");
var ADS_UF_DONT_EXPIRE_PASSWD = 0x10000; // 65536
var wbemFlagReturnImmediately = 0x10;
var wbemFlagForwardOnly = 0x20;
var envComputerName=wsh.ExpandEnvironmentStrings("%computername%");
var envTemp=wsh.ExpandEnvironmentStrings("%temp%");
var envWindir=wsh.ExpandEnvironmentStrings("%windir%");

colAccounts = GetObject("WinNT://" + envComputerName + "");
try {
  objGroup = colAccounts.Create("group", "BLAH_group");
  objGroup.SetInfo();
  WScript.Echo("group created");
  }
catch(e) {WScript.Echo("error:"+e);}

try {
  objUser = colAccounts.Create("user", "BLAH_user");
  objUser.SetPassword("BLAH_password");
  objUser.SetInfo();
  objGroup.Add(objUser.ADsPath);
  WScript.Echo("user added");
  }
catch(e) {WScript.Echo("error:"+e.description);}