$rechte->getBerechtigungen($user);
if (!$rechte->isBerechtigt('basis/moodle')) {
die('Sie haben keine Berechtigung für diese Seite');
}
if (!($db = new basis_db())) {
die('Fehler bei der Datenbankverbindung');
}
$userliste = isset($_POST['userliste']) ? trim($_POST['userliste']) : '';
$messages = '';
if ($userliste != '') {
$moodle = new moodle24_user();
$uids = explode("\n", $userliste);
foreach ($uids as $uid) {
$uid = trim($uid);
// Check ob User nicht bereits angelegt ist
if (!$moodle->loaduser($uid)) {
// User ist noch nicht in Moodle angelegt => Neuanlage
if (!$moodle->createUser($uid)) {
$messages .= $moodle->errormsg . 'X' . $uid . 'X';
} else {
$messages .= '<br>User ' . $uid . ' angelegt';
}
} else {
$messages .= '<br>User ' . $uid . ' bereits vorhanden';
}
}
}
echo '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<title>Moodle 2.4 - Accountverwaltung</title>
$rechte = new benutzerberechtigung();
$rechte->getBerechtigungen($user);
if (!$rechte->isBerechtigt('basis/moodle')) {
die('Sie haben keine Berechtigung für diese Seite');
}
if (!($db = new basis_db())) {
die('Fehler bei der Datenbankverbindung');
}
$uid = isset($_REQUEST['uid']) ? trim($_REQUEST['uid']) : '';
$mdl_user_id = isset($_REQUEST['mdl_user_id']) ? trim($_REQUEST['mdl_user_id']) : '';
$searchstr = isset($_REQUEST['searchstr']) ? trim($_REQUEST['searchstr']) : '';
$content = '';
$moodle = new moodle24_user();
if ($uid != '') {
// Check ob User nicht bereits angelegt ist
if (!$moodle->loaduser($uid)) {
// User ist noch nicht in Moodle angelegt => Neuanlage
if (!$moodle->createUser($uid)) {
$content .= $moodle->errormsg;
}
}
}
$content .= '
<form name="search" method="GET" action="' . $_SERVER["PHP_SELF"] . '" target="_self">
Bitte Suchbegriff eingeben:
<input type="text" name="searchstr" size="30" value="' . $db->convert_html_chars($searchstr) . '">
<input type="submit" value="Suchen">
</form>
<hr>';
if ($searchstr != '' && $searchstr != '?' && $searchstr != '*') {
// SQL Select-String
