Admin Update Service Pack 1.0 SP Updates and improves some administration features. 1) Remove old threads can be used on specified boards instead of entire forum, allowing boards such as ones used for announcements to be skipped over when deleting old messages. 2) Gives Maintenance Controls in Admin Center confirmation boxes so features are not accidentally executed by mistaken clicking. 3) Makes delete on messages as for confirmation of delete and makes remove thread confirmation into same confirmation box format. Made compatible for Service Pack by Jalapeno. Also put all text into english.lng for easier translation. DaveB (adapted for SP1 by Jalapeno) http://www.davesworldzone.com/ Sources/RemoveOldThreads.pl foreach $curboard (@catinfo) { chomp $curboard; if ($FORM{$curboard.'check'} == 1) { } fclose(FILE); } Sources/Admin.pl - $txt{'202'}
- $txt{'502'}
- $txt{'504'}
- $txt{'593'}
- ($txt{'595'})
$txt{'124'} $txt{'579'}
- $txt{'202'}
- $txt{'502'}
- $txt{'504'}
- $txt{'593'}
- $txt{'595'}
- $aduptxt{'04'}
 sub RebuildMemList { sub DeleteOldMessages { &is_admin; fopen(FILE, "$vardir/oldestmes.txt"); $maxdays = ; fclose(FILE); $yytitle = "$aduptxt{'04'}"; $yymain .= qq~
$aduptxt{'04'}

$aduptxt{'05'}

$txt{'124'} $txt{'579'} in:

~; fopen(FILE, "$vardir/cat.txt"); @categories = ; fclose(FILE); foreach $curcat (@categories) { chomp $curcat; fopen(FILE, "$boardsdir/$curcat.cat"); $curcatname = ; $curcataccess = ; chomp $curcatname; chomp $curcataccess; @catinfo = ; fclose(FILE); foreach $curboard (@catinfo) { chomp $curboard; fopen(FILE, "$boardsdir/$curboard.dat"); @boardinfo = ; fclose(FILE); chomp $boardinfo[0]; $boardname = $boardinfo[0]; chomp $curboard; $selectname = $curboard.'check'; $yymain .= qq~ ~; } } $yymain .= qq~
$boardname  
~; &template; exit; } YaBB.pl elsif ($action eq 'deletemultimembers') { require "$sourcedir/Admin.pl"; &DeleteMultiMembers; } elsif ($action eq 'deleteoldthreads') { require "$sourcedir/Admin.pl"; &DeleteOldMessages; } english.lng $txt{'796'} = "Your Instant Messages:"; $aduptxt{'01'} = "Are you sure you want to recount all board totals?"; $aduptxt{'02'} = "Are you sure you want to recount the membership?"; $aduptxt{'03'} = "Are you sure you want to rebuild the members list?"; $aduptxt{'04'} = "Remove Old Threads"; $aduptxt{'05'} = "Input the maximum number of how many days old messages can be without being deleted during this process. Then select the boards in which you will be deleting messages that are older than the number of days old you specified.";