| |
以下のようにして、「後で送信／今すぐ送信時」に登録したらどうでしょう。（秀
まるおさんのマクロを参考に作ってみました。なお、dllfunc("CountCurrentHeader",
"To")の数は見ていないので、もし必要なら追加してください（手抜きです））
//Bcc警告マクロ
loaddll "tkinfo.dll";
$WarnAccount = "aaaaa/bbbbb";
$WarnTo = "ccc@dddd/eee@ffff";
$WarnBcc = "ggg@hhhh/iii@jjjj";
if (strstr($WarnAccount, dllfuncstr("CurrentAccount")) == -1) endmacro;
$Bcc = dllfuncstr("CurrentHeader", "Bcc");
#NumberBcc = dllfunc("CountEmailList", $Bcc);
#i = 0; #flag = 0;
while (#i < #NumberBcc) {
$email = dllfuncstr("GetEmailList", $Bcc, #i);
$email = dllfuncstr("SetEmailOnly", $email);
$email = dllfuncstr("ToLower", $email);
if (strstr($WarnBcc, $email) != -1) {
#flag = 1;
break;
}
#i = #i + 1;
}
if (#flag == 0) endmacro;
$To = dllfuncstr("CurrentHeader", "To");
#NumberTo = dllfunc("CountEmailList", $To);
#i = 0; #flag = 0;
while (#i < #NumberTo) {
$email = dllfuncstr("GetEmailList", $To, #i);
$email = dllfuncstr("SetEmailOnly", $email);
$email = dllfuncstr("ToLower", $email);
if (strstr($WarnTo, $email) != -1) {
#flag = 1;
break;
}
#i = #i + 1;
}
if (#flag == 0) endmacro;
message "Bcc警告！！！ 送信を取りやめます ";
#n = dllfunc("SetCancel", 1);
|
|