#### Show last 5 registered members HACK #### by C.v. Marle (C.A.vanMarle@inter.NL.net) # Some things may differ, because I've a very modified board... # Sorry... If you can't find any thing, please mail me... # BACK-UP all your files before editing!!! # Don't blame me if your board's messed up ## =( Known bugs: if you remove one of the last 5 registered members he's still on ## ikonboard.cgi, you have to change this manualy in data/boardstats.cgi (#) # = number of replacements >> In these files [forumoptions.cgi(1), post.cgi(1), postings.cgi(1), setforums.cgi(1), setmembers.cgi(3)] add this: print FILE "\$lastregisteredmember1 = \"$lastregisteredmember1\"\;\n"; print FILE "\$lastregisteredmember2 = \"$lastregisteredmember2\"\;\n"; print FILE "\$lastregisteredmember3 = \"$lastregisteredmember3\"\;\n"; print FILE "\$lastregisteredmember4 = \"$lastregisteredmember4\"\;\n"; >> After: print FILE "\$lastregisteredmember = \"$lastregisteredmember\"\;\n"; [ikonboard.cgi] >> Change: ### Set up the variables for the last registered Member $cleanlastregistered = $lastregisteredmember; $cleanlastregistered =~ y/ /_/; $cleanlastregistered = qq~$lastregisteredmember~; #------- HTML $output .= qq~
$boardname welcomes its newest member $cleanlastregistered
$boardname has $totalmembers members with $totalposts posts in $totalthreads topics
>> To: ### Set up the variables for the last 5 registered Members $lastregisteredmember0=$lastregisteredmember; for ($i=0;$i<=5;$i++) { eval("\$cleanlastregistered$i = \$lastregisteredmember$i;"); eval("\$cleanlastregistered$i =~ y/ /_/;"); eval("\$cleanlastregistered$i = qq~\$lastregisteredmember$i~;"); } $cleanlastregistered=$cleanlastregistered0; #------- HTML $output .= qq~
$boardname welcomes its newest member $cleanlastregistered, $cleanlastregistered1, $cleanlastregistered2, $cleanlastregistered3, $cleanlastregistered4
$boardname has $totalmembers members with $totalposts posts in $totalthreads topics
>> You can change the line "$boardname welcomes its newest member $cleanlastregistered, $cleanlastregistered1, $cleanlastregistered2, $cleanlastregistered3, $cleanlastregistered4
" >> to anything you want... [register.cgi] >> Change: print FILE "\$lastregisteredmember = \"$inmembername\"\;\n"; print FILE "\$totalmembers = \"$totalmembers\"\;\n"; print FILE "\$totalthreads = \"$totalthreads\"\;\n"; print FILE "\$totalposts = \"$totalposts\"\;\n"; print FILE "\n1\;"; close (FILE); >> To: print FILE "\$lastregisteredmember = \"$inmembername\"\;\n"; print FILE "\$lastregisteredmember1 = \"$lastregisteredmember\"\;\n"; print FILE "\$lastregisteredmember2 = \"$lastregisteredmember1\"\;\n"; print FILE "\$lastregisteredmember3 = \"$lastregisteredmember2\"\;\n"; print FILE "\$lastregisteredmember4 = \"$lastregisteredmember3\"\;\n"; print FILE "\$totalmembers = \"$totalmembers\"\;\n"; print FILE "\$totalthreads = \"$totalthreads\"\;\n"; print FILE "\$totalposts = \"$totalposts\"\;\n"; print FILE "\n1\;"; close (FILE); # I think that should do it... ;) # Mzzl, Chris # P.S. if you find any bugs/errors please send me an e-mail