search

B0Bka / box

0 stars 0 forks source link

стара підписка #14

Open B0Bka opened 7 years ago

B0Bka commented 7 years ago

`

Рассылка новостей Акции каждую неделю!

php

`<? header("Cache-Control: no-cache, must-revalidate"); header("Pragma: no-cache"); header('Content-Type: text/html; charset=utf-8'); require_once($_SERVER['DOCUMENT_ROOT'].'/bitrix/modules/main/include/prolog_before.php'); // include bitrix prolog (clasess) define("STOP_STATISTICS", true); // disable statistic CModule::IncludeModule("subscribe"); $email = htmlspecialchars($_POST['email']); $subscr = CSubscription::GetList( array("ID"=>"ASC"), array("EMAIL"=>$email) ); while(($subscr_arr = $subscr->Fetch())) $aId = $subscr_arr["ID"]; if($aId > 0 ) $res = array('type' => 'error', 'text' => 'Вы уже подписаны на рассылку'); else { $arFields = Array( "USER_ID" => intval($_POST['uid']), "FORMAT" => "html", "EMAIL" => $email, "ACTIVE" => "Y", "SEND_CONFIRM" => "N", "CONFIRMED" => "Y", "RUB_ID" => array(9) ); $subscr = new CSubscription;

//can add without authorization
$ID = $subscr->Add($arFields);
if($ID>0)
{
    $res = array('type' => 'good', 'text' => 'Спасибо за подписку!');
    CSubscription::Authorize($ID);
}
else
{
    $strWarning .= "Error adding subscription: ".$subscr->LAST_ERROR."<br>";
    \Bitrix\Main\Diag\Debug::writeToFile($strWarning,"error",'/local/logs/subscribe.txt');
    $res = array('type' => 'error', 'text' => 'Ошибка подписки на рассылку');
}

} echo json_encode($res);`