3x-6x自动发送到邮箱

/file remove [/file find name=($user.".rsc")];
:log error ("系统自动备份成功，邮件通知发送成功！)
}
:global na ("$who"."$nyr");
:global user ("$who"."$nyr");
#设置发送服务器相关参数
:local address ""
:set address [:resolve $smtp]
/tool e-mail set from=($from) password=($password) address=($address) port=25 user=($username);
:if ($yy<10) do={:set yy (0 . $yy)}
:set nyr ([:pick $nyr 7 11] . $yy . [:pick $nyr 4 6])
:global who ("MikroTik v" . [/system package get system version] . "_")
:delay 10;
/tool e-mail send to=$toone subject=("$servername" . "$nyr" . "备份") file=($user.".rsc") body=$body2
:delay 5;
/tool e-mail send to=$totwo subject=("$servername" . "$nyr" . "备份") file=($na.".backup") body=$body1
:local body2 "以下附件为当日用户资料脚本备份，请勿删除任何备份文件，请勿回复本邮件！"
:local nyr [/system clock get date]
:local yy ([:find jan,feb,mar,apr,may,jun,jul,aug,sep,oct,nov,dec [:pick $nyr 0 3]]+1)
:delay 10;
/tool e-mail send to=$totwo subject=("$servername" . "$nyr" . "备份") file=($user.".rsc") body=$body2
#延迟10秒后执行删除操作
:delay 10;
#开始删除
/file remove [/file find name=($na.".backup")];
/system backup save name=$na
/ppp secret export file=$user
:delay 3;
#邮件发送
/tool e-mail send to=$toone subject=("$servername" . "$nyr" . "备份") file=($na.".backup") body=$body1
#接收邮件地址,两个邮箱接收避免收不到(修改下面两个邮箱地址即可)
:local toone "nishiernai@"
:local totwo "crack_me@"
#服务器标识
:local servername "邮件附件名"
:local body1 "以下附件为当日脚本备份，请勿删除任何备份文件，请勿回复本邮件！"
{
#smtp配置，smtp服务器，邮箱名，用户名，密码
#此处可不用更改，一般不是VIP的做不了发信箱
:local smtp ""
:local from "crack_me@"
:local username "crack_me"
:local password "1985654"