moodle/admin/user/user_bulk_delete.php

<?php //$Id$
/**
* script for bulk user delete operations
*/

require_once('../../config.php');
require_once($CFG->libdir.'/adminlib.php');

$confirm     = optional_param('confirm', 0, PARAM_BOOL);
$sitecontext = get_context_instance(CONTEXT_SYSTEM, SITEID);

require_capability('moodle/user:delete', $sitecontext);

// clean-up users list
$primaryadmin = get_admin();
$userlist = array();
foreach ($SESSION->bulk_susers as $k => $v) {
    $user = get_record('user', 'id', $v, null, null, null, null, 'id,firstname,lastname,email,auth');
    if (!empty($user) && $user->id != $primaryadmin->id) {
        $userlist[$k] = $user;
    }
}

if (empty($userlist)) {
    redirect($CFG->wwwroot . '/admin/user/user_bulk.php');
}

admin_externalpage_setup('userbulk');
admin_externalpage_print_header();
if (empty($confirm)) {
    $usernames = array();
    foreach ($userlist as $user) {
        $usernames[] =& fullname($user, true);
    }
    $usernames = implode(', ', $usernames);
    $optionsyes['confirm'] = 1;
    $optionsyes['sesskey'] = sesskey();
    print_heading(get_string('confirmation', 'admin'));
    notice_yesno(get_string('deletecheckfull', '', $usernames), 'user_bulk_delete.php', 'user_bulk.php', $optionsyes, NULL, 'post', 'get');
} else {
    foreach ($userlist as $k => $user) {
        if (delete_user($user)) {
            unset($SESSION->bulk_susers[$k]);
        } else {
            notify(get_string('deletednot', '', fullname($user, true)));
        }
    }
    redirect($CFG->wwwroot . '/admin/user/user_bulk.php', get_string('changessaved'));
}
admin_externalpage_print_footer();
?>