| |
方法としては、まずはそこのフォルダのメールをすべて選択して、以下のマク
ロを実行します。
loaddll "tkinfo.dll";
setclipboard "";
#n = dllfunc("LockSelection");
while(1) {
#n = dllfunc("EnumSelection", 1);
if( #n == 0 ) {
break;
}
$from = dllfuncstr("CurrentHeader", "From");
$from = dllfuncstr("SetEmailOnly", $from );
addclipboard $from + "\r\n";
}
#n = dllfunc("UnlockSelection", 1);
そうするとクリップボードにfromアドレスが改行区切りで全部入ります。それ
を秀丸エディタに貼り付けます。
そこで今度は以下のマクロを実行します。
gofiletop;
while( code != eof ) {
#y = y;
$s = gettext( x, y, x + 999, y );
if( $s != "" ) {
golineend;
while(1) {
replacedown $s,"";
if( !result ) break;
}
}
moveto 0, #y;
down;
if( !result ) break;
}
とすると、重なってるメールアドレスが削除されて、１つのメールアドレスが
１つだけ存在するような状態になります。
あとは、全置換（正規表現ON）で「\n\n」を「\n」にする等を繰り返して余計
な改行を除去してから、さにに正規表現ONで「\n」を「,」に置換するなどすれ
ば、それで宛先文字列が完成すると思います。
それを使ってメールを送信したらいいんじゃないかと思います。
|
|