GetGroupRight("forum"); if ($FORUM_RIGHT=="D") $APPLICATION->AuthForm(GetMessage("ACCESS_DENIED")); IncludeModuleLangFile(__FILE__); require_once($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/forum/prolog.php"); $ID = IntVal($ID); $arForum = CForumNew::GetByID($ID); if (!$arForum) { LocalRedirect("forum_admin.php?lang=".$lang); die(); } if (CForumNew::GetUserPermission($ID, $USER->GetUserGroupArray())<"Q") $APPLICATION->AuthForm(GetMessage("ACCESS_DENIED")); $strErrorMessage = ""; $strOKMessage = ""; if ($REQUEST_METHOD=="GET" && $ACTION=="SHOW" && $MID>0 && $FORUM_RIGHT>="R" && CForumNew::GetUserPermission($ID, $USER->GetUserGroupArray())>="Q" && check_bitrix_sessid()) { CForumMessage::Update($MID, array("APPROVED"=>"Y")); CForumMessage::SendMailMessage($MID, array(), false, "NEW_FORUM_MESSAGE"); } elseif ($REQUEST_METHOD=="GET" && $ACTION=="DEL" && $MID>0 && $FORUM_RIGHT>="W" && CForumNew::GetUserPermission($ID, $USER->GetUserGroupArray())>="U" && check_bitrix_sessid()) { if (!CForumMessage::CanUserDeleteMessage($MID, $USER->GetUserGroupArray(), $USER->GetID())) $strErrorMessage .= GetMessage("FM_NO_PERMS2DEL").". \n"; if (strlen($strErrorMessage)<=0) { CForumMessage::Delete($MID); } } $APPLICATION->SetTitle(GetMessage("FORUM_MODERATE")); $APPLICATION->SetTemplateCSS("forum/forum_tmpl_1/forum.css"); require($_SERVER["DOCUMENT_ROOT"]."/bitrix/modules/main/include/prolog_admin_after.php"); /*********************************************************************/ /******************** BODY *****************************************/ /*********************************************************************/ ?>

$arForum["ALLOW_HTML"], "ANCHOR" => $arForum["ALLOW_ANCHOR"], "BIU" => $arForum["ALLOW_BIU"], "IMG" => $arForum["ALLOW_IMG"], "VIDEO" => $arForum["VIDEO"], "LIST" => $arForum["ALLOW_LIST"], "QUOTE" => $arForum["ALLOW_QUOTE"], "CODE" => $arForum["ALLOW_CODE"], "FONT" => $arForum["ALLOW_FONT"], "SMILES" => $arForum["ALLOW_SMILES"], "UPLOAD" => $arForum["ALLOW_UPLOAD"], "NL2BR" => $arForum["ALLOW_NL2BR"] ); $parser = new textParser(LANG); $arMessages = CForumMessage::GetListEx(array("ID"=>"ASC"), array("FORUM_ID" => $ID, "APPROVED" => "N")); $arMessages->NavStart($FORUM_MESSAGES_PER_PAGE); while ($arMessages->NavNext(true, "f_", false)): $arCurTopic = CForumTopic::GetByID($f_TOPIC_ID); ?>

,

0) echo " ".htmlspecialcharsEx($f_DESCRIPTION);?> 0) { $arMessageUserGroups = CUser::GetUserGroup($f_AUTHOR_ID); if (!in_array(2, $arMessageUserGroups)) $arMessageUserGroups[] = 2; $strMessageUserPerms = CForumNew::GetUserPermission($ID, $arMessageUserGroups); if ($strMessageUserPerms=="Q") echo " ".GetMessage("FM_MODER").""; elseif ($strMessageUserPerms=="U") echo " ".GetMessage("FM_EDITOR").""; elseif ($strMessageUserPerms=="Y") echo " ".GetMessage("FM_ADMIN").""; elseif (IntVal($f_RANK_ID)>0) { $arRank = CForumRank::GetLangByID($f_RANK_ID, LANG); echo " ".$arRank["NAME"]; } } else { echo " ".GetMessage("FM_GUEST").""; } ?> 0):?> 0):?> : 0):?> : ="Q" && CModule::IncludeModule("statistic") && IntVal($f_GUEST_ID)>0 && $APPLICATION->GetGroupRight("statistic")!="D"):?> :