| |
宛先の中に特定のメールアドレスが含まれるかどうかは、お手軽にやるとした
ら、例えば
loaddll "tkinfo.dll";
$to = dllfuncstr("CurrentHeaderUnited", "To" );
$cc = dllfuncstr("CurrentHeaderUnited", "Cc" );
$bcc = dllfuncstr("CurrentHeaderUnited", "Bcc" );
$to = $to + "," + $cc + "," + $bcc;
$to = dllfuncstr("ToLower", $to);
if( strstr( $to, "aaaa@aaaa" ) >= 0 ) {
message "宛先にaaaa@aaaaが含まれてます。";
}
みたいな感じでいけます。
ただ、このマクロだと、"aaaaaaaaa@aaaa"みたいな宛先があってもヒットした
扱いになってしまいます。この辺を正確に判定するには、ちょっと面倒ですが以
下のようなマクロが必要になります。
loaddll "tkinfo.dll";
$to = dllfuncstr("CurrentHeaderUnited", "To" );
$cc = dllfuncstr("CurrentHeaderUnited", "Cc" );
$bcc = dllfuncstr("CurrentHeaderUnited", "Bcc" );
$to = $to + "," + $cc + "," + $bcc;
$to = dllfuncstr("ToLower", $to);
#emailCount = dllfunc("CountEmailList", $to);
#i = 0;
#found = 0;
while( #i < #emailCount ) {
$email = dllfuncstr("GetEmailList", $to, #i);
if( $email == "aaaa@aaaa" ) {
#found = 1;
break;
}
#i = #i + 1;
}
if( #found ) {
message "宛先にaaaa@aaaaが含まれてます。";
}
|
|