vb.org Archive - Mods can moderate new users

haven't tested:

copy this code from admin/user.php

into mod/user.php

PHP Code:


		
			
// ###################### Start moderate + coppa #######################

if ($action=="moderate") {



  /*

  // delete coppa entries older than 30 days

  $datecut=time()-(30*60*60*24);

  $DB_site->query("DELETE FROM user WHERE joindate<$datecut AND usergroupid=4");

  */



  $users=$DB_site->query("SELECT userid,username,email FROM user WHERE usergroupid=4 ORDER BY username");



  if ($DB_site->num_rows($users)==0) {

    echo "<p>None awaiting validation</p>";

  } else {

    doformheader("user","domoderate");



    echo "<tr class='tblhead'><td><p><b><span class='tblhead'>Validate?</span></b></p></td><td><p><b><span class='tblhead'>Name</span></b></p></td><td><p><b><span class='tblhead'>Email</span></b></p></td><td><p><b><span class='tblhead'>Options</span></b></p></td></tr>\n";

    while ($user=$DB_site->fetch_array($users)) {



      echo "<tr class='".getrowbg()."'><td><p> Yes<input type=\"radio\" checked name=\"validate[$user[userid]]\" value=\"1\"> No <input type=\"radio\" name=\"validate[$user[userid]]\" value=\"0\"></p></td>";

      echo "<td><p>$user[username]</p></td><td><p><a href=\"mailto:$user[email]\">$user[email]</a></p></td><td><p><a href=\"user.php?s=$session[sessionhash]&action=edit&userid=$user[userid]\" target=_blank>View profile</a></p></td></tr>\n";



    }



    maketableheader("Send this email to validated users:","",1,4);

    echo "<tr class='".getrowbg()."'><td>Subject:</td><td colspan='3'><input type=text name=subject size=50 value=\"Your account at $bbtitle has been activated\"></td></tr>\n";



    $gettemp=$DB_site->query_first("SELECT template FROM template WHERE title='email_validated' AND (templatesetid=-1 OR templatesetid=1) ORDER BY templatesetid DESC"); //kludgy!!

    $template=$gettemp[template];



    echo "<tr class='".getrowbg()."'><td>Body:</td><td colspan='3'><textarea rows=10 cols=50 name=email>".htmlspecialchars($template)."</textarea></td></tr>\n";



    doformfooter("Process Users","Reset",4);

  }

}



// ###################### Start do moderate and coppa #######################

if ($HTTP_POST_VARS['action']=="domoderate") {



  while (list($key,$val)=each($validate)) {

    if ($val==1) {



      $user=$DB_site->query_first("SELECT username,email FROM user WHERE userid=$key");

      $username=unhtmlspecialchars($user[username]);



      eval("\$message = \"".ereg_replace("\"","\\\"",$email)."\";");

      eval("\$subject = \"".ereg_replace("\"","\\\"",$subject)."\";");



      mail ($user[email],$subject,$message,"From: $webmasteremail");



      $DB_site->query("UPDATE user SET usergroupid=2 WHERE userid=$key");

    }

  }



  echo "<p>Accounts validated and users notified</p>";



}

then just add a link to the mod-cp user.php?action=moderate

no responsibility :)

X vBulletin 3.8.12 by vBS Debug Information
Page Generation 0.01089 seconds Memory Usage 1,745KB Queries Executed 10 (?)
More Information
Template Usage: (1)ad_footer_end (1)ad_footer_start (1)ad_header_end (1)ad_header_logo (1)ad_navbar_below (1)bbcode_php_printable (1)footer (1)gobutton (1)header (1)headinclude (6)option (1)post_thanks_navbar_search (1)printthread (5)printthreadbit (1)spacer_close (1)spacer_open Phrase Groups Available: global postbit showthread	Included Files: ./printthread.php ./global.php ./includes/init.php ./includes/class_core.php ./includes/config.php ./includes/functions.php ./includes/class_hook.php ./includes/modsystem_functions.php ./includes/class_bbcode_alt.php ./includes/class_bbcode.php ./includes/functions_bigthree.php Hooks Called: init_startup init_startup_session_setup_start init_startup_session_setup_complete cache_permissions fetch_threadinfo_query fetch_threadinfo fetch_foruminfo style_fetch cache_templates global_start parse_templates global_setup_complete printthread_start bbcode_fetch_tags bbcode_create bbcode_parse_start bbcode_parse_complete_precache bbcode_parse_complete printthread_post printthread_complete
Messages: