Получить в битрикс email админов и отправить им письмо

Иногда нужен функционал отправки письма с данными на почтовый ящик админов.
Используем CUser::GetList для получения почтовых ящиков, а CEvent::Send для отправки сообщения
Всё это делается в init.php
Пример:

    $countUsers = count($arUsers); 

  //получаем админов   
$rsAdmins = CUser::GetList($by = "ID", $order = "ASC", array('GROUPS_ID' => 1)); 

    //вытаскиваем почтовые ящики
while ($admin = $rsAdmins->Fetch()) { 

       //отправляем письмо
 CEvent::Send('COUNT_REGISTERED_USERS', 's1', array( 

            'EMAIL_TO' => $admin['EMAIL'], 

            'COUNT_USERS' => $countUsers, 

            'COUNT_DAYS' => $days, 

        ), "Y", "29"); 

    }