| |
"GetFolderMailCount関数の返り値が0でした。マクロ終了します。"
以外のメッセージは出ませんでした。
$targetacc = "＊@＊";
loaddll "tkinfo.dll";
#count = dllfunc("GetFolderMailCount", $targetacc, "未送信");
if( #count == 0 ) {
message "GetFolderMailCount関数の返り値が0でした。マクロ終了します。";
endmacro;
}
$account = dllfuncstr("CurrentAccount");
message "$account = " + $account;
$folder = dllfuncstr("CurrentFolder");
message "$folder = " + $folder;
#n = dllfunc("SelectFolder", $targetacc, "未送信");
message "#n = " + #n;
if( dllfunc("IsThreadView") ) {
message "dllfunc(IsThreadView)";
#n = dllfunc("SetThreadView", 0);
}
#i = 0;
message "#i = 0";
while( #i < #count ) {
message "while( #i < #count )";
#n = dllfunc("SetMailIndex", #i);
message "#n = " + #n;
if( dllfuncstr("CurrentHeader", "Resent-From:") != "" ) {
message "if( dllfuncstr(CurrentHeader, Resent-From:) != )";
//そのまま転送 のメールの場合のみ
message "//そのまま転送 のメールの場合のみ";
#browsemode = browsemode;
message "#browsemode = " + #browsemode;
#readonly = readonly;
message "#readonly = " + #readonly;
if( browsemode ) browsemodeswitch;
message "if( browsemode ) browsemodeswitch";
if( readonly ) readonlyswitch;
message "if( readonly ) readonlyswitch";
#n = dllfunc("BeginEditMail");
message "#n = " + #n;
message "メールを書き換えます。";
insert "●●●●●●●●●●●●●●●●●●●●\n";
insert "●●●●●●●●●●●●●●●●●●●●\n";
insert "●●●●●●●●●●●●●●●●●●●●\n";
insert "●●●●●●●●●●●●●●●●●●●●\n";
insert "●●●●●●●●●●●●●●●●●●●●\n";
message "メール書き換えされました。";
replaceallfast "^(?!(TEL:[0-9]+|.*?「.+?」さんから)).+\\n", "", regular,
nocasesense;
replaceallfast "^\n", "", regular, nocasesense;
if( updated ) {
#n = dllfunc("SaveEditMail", 0, 1);
} else {
#n = dllfunc("CancelEditMail");
}
if( browsemode ) browsemodeswitch;
if( readonly ) readonlyswitch;
}
#i = #i + 1;
}
#n = dllfunc("SelectFolder", $account, $folder);
|
|