3 require_once('../mitsql.cfg.php');
4 require_once('mitsql.lib.php');
5 require_once('proc.lib.php');
7 require_once('batch.inc.php');
9 $Login = new Login($i_u, $i_p);
10 if (!$Login->canLogin()) die('-1');
12 $User = new User($Login->getUserID());
13 $myUsername = $User->getUsername();
15 if (substr($i_d,0,strlen($myUsername)+1) == $myUsername.DELIMETER) {
16 $i_d = explode(DELIMETER, $i_d);
18 $i_d = implode(DELIMETER, $i_d);
21 list($msg1, $err1) = proc::newdb($User, $i_d);
22 if (!empty($err1)) die('-3,'.implode(' ',$err1));
23 if (empty($err1)) die('0,'.$i_d);