Russian Users MikroTik | Форум пользователей MikroTik

Код: Выделить всё

:log info message=("Start Sending Report");
:local ipList value="";
:foreach tmpAddress in=[/ip firewall address-list find where dynamic=yes and list=BlackListWinbox] do={
  :set $ipList value=([/ip firewall address-list get $tmpAddress value-name=address]."\r\n".$ipList);
}

:if ($ipList != "") do={
  /tool e-mail send from="mikrotik01@fcom.ru" to="warning@fcom.ru" subject=("BlackListWinbox ".[/system clock get date]." ".[/system clock get time]) body=("Auto-blacklisted host:\r\n".$ipList)
  :log info message=("Sending Report End");
}

Код: Выделить всё

:log info message=("Start Sending Report");
:local ipList "";
:local hasEntries false;

:foreach tmpAddress in=[/ip firewall address-list find where dynamic=yes and list=BlackListWinbox] do={
  :set ipList ($ipList . "\r\n" . [/ip firewall address-list get $tmpAddress value-name=address]);
  :set hasEntries true;
}

:if ($hasEntries) do={
  :local messageBody ("List of auto-blacklisted host:\r\n" .$ipList);
  
  /tool fetch url=("https://api.telegram.org/bot1003412305:AAE_XIDNKAXWBYE9J33JААRB0U2FP2LbE/sendmessage?chat_id=-4178532902&text= .$messageBody") mode=https keep-result=no
  :log info message=("Sending Report End");
}

Код: Выделить всё

:log info message=("Start Sending Report");
:local ipList "";
:local hasEntries false;

:foreach tmpAddress in=[/ip firewall address-list find where dynamic=yes and list=BlackListWinbox] do={
  :set $ipList ($ipList . "%0A" . [/ip firewall address-list get $tmpAddress value-name=address]);
  :set hasEntries true;
}

:if ($hasEntries) do={
  :local messageBody ("List of auto-blacklisted host:%0A" .$ipList);
  
  /tool fetch url=("https://api.telegram.org/bot1003412305:AAE_XIDNKAXWBYE9J33JААRB0U2FP2LbE/sendmessage?chat_id=-4178532902&text= .$messageBody") mode=https keep-result=no
  :log info message=("Sending Report End");
}
}

Код: Выделить всё

:log info "Start Sending Report"
:local ipList
:local hasEntries false

:foreach tmpAddress in=[/ip firewall address-list find where dynamic=yes and list=BlackListWinbox] do={
  :set $ipList ($ipList . "%0A" . [/ip firewall address-list get $tmpAddress address])
  :set hasEntries true
}

:if ($hasEntries) do={
  :local messageBody ("List of auto-blacklisted host:%0A" .$ipList)
  
  /tool fetch url=("https://api.telegram.org/bot1003412305:AAE_XIDNKAXWBYE9J33JААRB0U2FP2LbE/sendmessage?chat_id=-4178532902&text= .$messageBody") mode=https keep-result=no
  :log info "Sending Report End"
}
}

Код: Выделить всё

:global EventHandler do={

  :global teSendMessage
  :local oneFeed "%0D%0A"

  :local logDefaultPicture "\F0\9F\93\84"
  :local chatID "-100234567890"

  :local messageText "$logDefaultPicture <b>$1 - $2 - $3</b> $oneFeed$oneFeed$4 $oneFeed"
  :if ([:len $1] != 0) do={
    $teSendMessage fChatID=$chatID fText=$messageText
  }
  :return 0
}

log/print follow-only where [$EventHandler $time $topics $buffer $message]