Удаление предупреждений через 7 дней или больше ;)

[SHiSH]

переделал скрипт от 2.0 но есть небольшое различие: удаляются за 7 дней и неудаляет в группе banned

если забить этот скрипт в cron получаем автоудаление

 

заливаем этот файл в корень форума и запускаем

<?
define( 'ROOT_PATH', "./" );
require ROOT_PATH."conf_global.php";
require ( ROOT_PATH."sources/Drivers/".$INFO['sql_driver'].".php" );
$DB = new db_driver;
$DB->obj['sql_database']	 = $INFO['sql_database'];
$DB->obj['sql_user']		 = $INFO['sql_user'];
$DB->obj['sql_pass']		 = $INFO['sql_pass'];
$DB->obj['sql_host']		 = $INFO['sql_host'];
$DB->connect();
run();

function run()
{
global $DB;

$wrdate = time() - (7*24*60*60);
$get_warn = $DB->query("SELECT * FROM ibf_warn_logs WHERE wlog_date < $wrdate AND wlog_type='neg'");
while ( $wrlog = $DB->fetch_row( $get_warn ) )
{
	$wr_memid = $wrlog['wlog_mid'];
	$get_mem = $DB->query("SELECT * FROM ibf_members WHERE id=$wr_memid");
	$wr_meminfo = $DB->fetch_row( $get_mem );
	if ($wr_meminfo['mgroup'] != 5)
	{
	 if ( $wr_meminfo['warn_level'] > 0 )
	 {
	 	 $DB->query("UPDATE ibf_members SET warn_level=warn_level-1 WHERE id='".$wr_memid."'");			
		  $DB->query("DELETE FROM ibf_warn_logs WHERE wlog_id={$wrlog['wlog_id']}");
	 }
	}
}

}


?>

чтоб изменить количество дней измените цифру 7 на другую в строчке

$wrdate = time() - (7*24*60*60);

Изменено 8 Февраля 2006 пользователем SHiSH

[EasyBot]

ммм и зачем этот мод)

[SHiSH]

если забить этот скрипт в cron получаем автоудаление

[EasyBot]

Зачем удалять логи :?))

Бан то сам снимается))

[SHiSH]

Удаление предупреждений через 7 дней или больше

[Song]

2SHiSH

 

Претензии как к писателю модов:

 

1) Зачем делать столько запросов, если всё можно сделать в один?

2)

!= 5)

- зачем здесь константа 5 ? А если у другого она будет не 5 ?

В conf_global.php есть 'ban_group', вот его и надо использовать.

3)

$wr_newlevel = $wr_meminfo['warn_level'] - 1;

$DB->query("UPDATE ibf_members SET warn_level='$wr_newlevel' WHERE id='$wr_memid'");

не думаете, что вот так проще:

$DB->query("UPDATE ibf_members SET warn_level=warn_level-1 WHERE id='".$wr_memid."'");

[SHiSH]

1) яж написал что адаптиравал от 2,0

2) у меня нет ...

3) исправлю