Перекидываю форум с PHPBB на Битрикс – благо конверторы писать с нуля не придётся – спасибо Долганину Антону за его статью Переезжаем с phpBB на форум Битрикс. Экспериментирую на тестовом форуме, поэтому перед наполнением, его нужно было почистить.
Собственно реализация этой небольшой ТЗ, созданная мной буквально за 5 минут (а битрикс то весьма удобен!):
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 |
<?php set_time_limit(0); ignore_user_abort(); require($_SERVER[“DOCUMENT_ROOT”].“/bitrix/modules/main/include/prolog_before.php”); if (CModule::IncludeModule(“forum”)) { // clear topics $db_res = CForumTopic::GetList(array(), array()); while ($ar_res = $db_res->Fetch()) { echo ‘deleted -‘.$ar_res[“TITLE”].‘<br>’; CForumTopic::Delete($ar_res[“ID”]); } // clear forums $db_Forum = CForumNew::GetList(array(), array()); while ($ar_Forum = $db_Forum->Fetch()) { CForumNew::Delete($ar_Forum[“ID”]); echo ‘deleted – ‘.$ar_Forum[“NAME”].‘<br>’; } //clear users (кроме меня) $rsUser = CUser::GetList($by=“ID”, $order=“DESC”, array()); while ($arU = $rsUser->GetNext()) { echo $arU[“NAME”].“<br>”; if($arU[“ID”]>1) { CUser::Delete($arU[“ID”]); echo “deleted<br>”; } else { echo “stay<br>”; } } } ?> |
2 комментария на «“Мой первый скрипт с Bitrix API – очистка форума”»
Антон польщён 🙂
Код можно немного оптимизировать в последней проходочке. Вот так:
//clear users (кроме меня)
$rsUser = CUser::GetList($by=”ID”, $order=”DESC”, array(“!ID”=>1));
while ($arU = $rsUser->GetNext()) {
echo $arU[“NAME”].””;
CUser::Delete($arU[“ID”]);
echo “deleted”;
}
Согласен, условие сразу в фильтр запихать – было бы правильнее.
Андрей, а ты чё – мой блог читаешь ? 🙂