29.8.18

MikroTik.Отправка списка адресов

Модификация скрипта из предыдущего поста для отправки на почту адресов, назначенных на интерфейсах:

:local months ("jan","feb","mar","apr","may","jun","jul","aug","sep","oct","nov","dec");
:local ts [/system clock get time];
:set ts ([:pick $ts 0 2].[:pick $ts 3 5].[:pick $ts 6 8]);
:local ds [/system clock get date];
:local month [ :pick $ds 0 3 ];
:local mm ([ :find $months $month -1 ] + 1);
:if ($mm < 10) do={ :set mm ("0" . $mm); };
:set ds ([:pick $ds 7 11] . $mm . [:pick $ds 4 6]);
:local fname3 ("Mikrotik-".[/system identity get name]."-".$ds."-".$ts.".ip");
/ip address print terse detail file=$fname3
/tool e-mail send to="admin@mail.com" subject=([/system identity get name]) from=mikrotik@mail.com file=$fname3 server=mail.mail.com;
:delay 3s;
:log info "send ip finished";
:delay 30s;
:foreach i in=[/file find] do={ :if ([:typeof [:find [/file get $i name] "Mikrotik-"]]!="nil") do={/file remove $i}; }
:log info message="Configuration backup finished.";

Комментариев нет:

Отправить комментарий