| |
秀まるおさまこんばんは。
マクロで重複チェックを実施させようと試してみたのですが
うまく動作しませんでした。
何かマクロの指定がまちがっているのでしょうか？。
ご指導よろしくお願いいたします。
---sample.mac
loaddll "TKInfo.dll";
$$t_account = dllfuncstr("ExecAtMain", "CurrentAccount" );
//SelectFolder関数(TkInfo.dll)
##n = dllfunc("ExecAtMain", "SelectFolder", $$t_account, "受信" );
//ViewArea関数(TkInfo.dll)
//メール一覧枠の「範囲」の所の現在のモードを返します。
##n = dllfunc("ExecAtMain", "ViewArea");
if(##n != 0){
//$$Folderの表示範囲を"全体"にする。
##n = dllfunc("ExecAtMain", "SetViewArea", 0);
}
//一覧表示にする
##n = dllfunc("ExecAtMain", "SetThreadView", 0);
//MailCountAll関数(TkInfo.dll)
//現在選択されているフォルダ中のメール個数を返します。
##n = dllfunc("ExecAtMain", "MailCountAll");
if(##n !=0){
//メール選択
##n = dllfunc("ExecAtMain", "SetMailIndex", 0);
//copy実施
##n = dllfunc("ExecAtMain", "Copy", "", "受信" );
//SetDuplicationCheckOption関数（TKInfo.dll）
//重複メールのチェックコマンド実行時のオプションを指定します。
##n = dllfunc("ExecAtMain", "SetDuplicationCheckOption",
//判定基準 - Date:ヘッダが一致している
"checkdate+" +
//判定基準 - メール本文の内容がほぼ一致している
"checkbody+" +
//優先順位 - メモ付き等のメールを残す
"prioritymarks+" +
//優先順位 - 添付ファイル付きの方を残す
"priorityattach+" +
//優先順位 - 送信済みメールを残す
"prioritysent+" +
//優先順位 - サイズの大きい方を残す
"prioritybig" );
message "SetDuplicationCheckOption result=\n" + str(##n) ;
//SelectFolder関数(TkInfo.dll)
##n = dllfunc("ExecAtMain","CheckDuplication", "batch",$$t_account);
message
$$t_account + "\n" +
"CheckDuplication result=\n" +
str(##n);
}
freedll;
endmacro;
|
|