Пример: копирование смайлов из форума в модуль блогов.
| Код |
|---|
CModule::IncludeModule("forum");
CModule::IncludeModule("blog");
$arLanguages = Array();
$rsLang = CLanguage::GetList();
while ($arLang = $rsLang->Fetch())
{
$arLanguages[] = $arLang["LID"];
}
$rsSmiles = CForumSmile::GetList();
while ($arSmile = $rsSmiles->Fetch())
{
if ($arSmile["TYPE"] != "S") continue; // Закомментировать, если надо скопировать не только смайлы, но и иконки
$arFields = Array(
"SORT" => $arSmile["SORT"],
"SMILE_TYPE" => $arSmile["TYPE"],
"TYPING" => $arSmile["TYPING"],
"IMAGE" => $arSmile["IMAGE"],
"CLICKABLE" => $arSmile["CLICKABLE"],
"IMAGE_WIDTH" => $arSmile["IMAGE_WIDTH"],
"IMAGE_HEIGHT" => $arSmile["IMAGE_HEIGHT"],
"LANG" => Array (),
);
foreach ($arLanguages as $lid)
{
$arSmileLang = CForumSmile::GetLangByID($arSmile["ID"], $lid);
$arFields["LANG"][] = Array(
"LID" => $lid,
"NAME" => $arSmileLang["NAME"],
);
}
$filename = $_SERVER["DOCUMENT_ROOT"]."/bitrix/images/blog/smile/".$arSmile["IMAGE"];
echo $filename.": ".$arSmile["TYPING"]."<br />";
copy ($_SERVER["DOCUMENT_ROOT"]."/bitrix/images/forum/smile/".$arSmile["IMAGE"], $filename);
chmod ($filename, BX_FILE_PERMISSIONS);
CBlogSmile::Add($arFields);
}
|
