]>
Commit | Line | Data |
---|---|---|
dc478ec8 | 1 | <?php |
79ffa771 JP |
2 | /* |
3 | (c) 2005 Joe Presbrey | |
4 | */ | |
dc478ec8 JP |
5 | |
6 | require_once('mitsql.cfg.php'); | |
7 | require_once('mitsql.lib.php'); | |
2f91d7fe | 8 | require_once('proc.lib.php'); |
4a77eeb5 | 9 | |
dc478ec8 JP |
10 | if (!isLoggedIn()) redirect('index'); |
11 | ||
9840d102 JP |
12 | $err1 = $msg1 = array(); |
13 | ||
377015e0 JP |
14 | $User = new User($Login->getUserID()); |
15 | ||
16 | if (isPost()) { | |
17 | if (isset($i_newdb)) { | |
2f91d7fe | 18 | list($msg1, $err1) = proc::newdb($User, $i_newdb); |
377015e0 | 19 | } |
e47be57b | 20 | if (isset($i_drop)) { |
2f91d7fe | 21 | list($msg1, $err1) = proc::drop($User, $i_drop); |
e47be57b | 22 | } |
690e37fb JP |
23 | } |
24 | ||
25 | if (!count($err1)) {//&& !isset($i_r)) | |
26 | checkQuotas($Login->getUserID()); | |
27 | $User->refresh(); | |
377015e0 JP |
28 | } |
29 | ||
2ea5a69f JP |
30 | $myDBs = $User->getDBList(); |
31 | ||
dc478ec8 JP |
32 | include 'tpl/main.php'; |
33 | ||
34 | ?> |