Настройка автоматической рассылки новостей в 1С-Битрикс

<?php
require($_SERVER['DOCUMENT_ROOT'].'/bitrix/modules/main/include/prolog_before.php');

use Bitrix\Main\Mail\Event;

// Данные для отправки
$eventName = 'TEST_NEWSLETTER';
$fields = [
    'EMAIL_TO' => 'test@example.com',
    'SUBJECT' => 'Последние новости',
    'BODY' => '
        <h1>Свежие новости</h1>
        <?$GLOBALS["APPLICATION"]->IncludeComponent(
            "bitrix:news.list.mail",
            "",
            array(
                "IBLOCK_TYPE" => "news",
                "IBLOCK_ID" => 1,
                "SORT_BY1" => "ACTIVE_FROM",
                "SORT_ORDER1" => "DESC",
                "NEWS_COUNT" => 3,
                "FIELD_CODE" => array("ID", "NAME", "PREVIEW_TEXT"),
                "PROPERTY_CODE" => array("", "")
            )
        );?>
        <p><a href="#UNSUBSCRIBE_LINK#">Отписаться</a></p>
    '
];

// Отправка письма
$result = Event::send([
    'EVENT_NAME' => $eventName,
    'LID' => 's1',
    'C_FIELDS' => $fields
]);

if ($result->isSuccess()) {
    echo 'Тестовое письмо успешно отправлено';
} else {
    echo 'Ошибка: ' . implode(', ', $result->getErrorMessages());
}

require($_SERVER['DOCUMENT_ROOT'].'/bitrix/modules/main/include/epilog_after.php');