| |
http://www.maruo.co.jp/hidesoft/ から会議室の書き込み内容を見ればいい
と思いますが、念のため書いておきます。
-----------------------------------------------------------------------
Subject: hidesoft.8:21724| RE 21723 迷惑メールの自動削除
あー、SelectFolder関数が失敗すると、現在フォルダのメールが全部無くなる
んですね。これは大変なことになってしまいました。
僕もそこまで頭が回りませんで…。大変すみません。あのマクロは危険なので
もう使わないで欲しいです。
> それでこの「鶴亀メール」の質問と答えが入ったフォルダーの中身も全部なくな
> りました。
「復元」というソフトを使って削除されたファイルを復元することが出来ます
けど、それでどうでしょ？
http://www.vector.co.jp/soft/win95/util/se192983.html
または、とりあえず、受信ログに残っている分は復活可能です。「全般的な設
定・フォルダ」の「表示するフォルダ・受信ログフォルダ」をONにすると受信ロ
グフォルダが出てくるので、例えばそこから「検索して一覧作成」で、
"hidesoft.8"のような文字列を検索して、それで出てきたメールをすべて選択し
てからマウス右ボタンメニューの「受信解析のやり直し」をすると復活します。
-----------------------------------------------------------------------
Subject: hidesoft.8:21725| RE 21724 迷惑メールの自動削除
迷惑メール用のフォルダがアカウント直下にある場合なら、
#n = dllfunc("SelectFolder", "NIFTY", "迷惑メール");
の所を、
#n = dllfunc("SelectFolder", "NIFTY", "User\\迷惑メール");
としないといけないようです。または、受信フォルダ配下にあるなら、
#n = dllfunc("SelectFolder", "NIFTY", "受信\\迷惑メール");
です。
あと、そもそも間違ったフォルダを指定したとしてもメールが無くなってしま
うのはまずいので、たしかに迷惑メールだけを削除するように直してみました。
動作が少々遅くなりますけど、安全のためにはこうすべきでした。
loaddll "tkinfo.dll";
$a = dllfuncstr("CurrentAccount");
$f = dllfuncstr("CurrentFolder");
#n = dllfunc("SelectFolder", "NIFTY", "User\\迷惑メール");
if( #n == 0 ) {
message "フォルダの選択に失敗しました。";
endmacro;
}
#c = dllfunc("MailCount");
if( #c != 0 ) {
#i = 0;
while( #i < #c ) {
#n = dllfunc("SetMailIndex", #i );
if( leftstr(
dllfuncstr( "CurrentHeader"
, "X-TuruKame-Filter" ), 4 )
== "spam" ) {
#n = dllfunc("Delete", 1);
#c = #c - 1;
} else {
#i = #i + 1;
}
}
}
#n = dllfunc("SelectFolder", $a, $f);
|
|