| |
> マクロなら出来ます。かつて、
>http://hidemaruo.dip.jp:81/hidesoft/hidesoft_8/x20558.html#20600
>に投稿しました。
ご回答ありがとうございます。
返答が遅くなりすみません。
試してみましたが、うまく動作しなかったため
すこし修正してみたらうまく動作してるようです。
マクロはよく知らないのと動作確認は数パターンした
程度です。修正したソース載せておきます。
-----
//---------- 選択したメールの添付ファイル削除 ------------------------
//添付ファイルを削除するだけ
//メールがコピーされていても考慮せずに削除
//HTML メールの index.htm はそのまま
loaddll "tkinfo.dll";
#tmp = dllfunc( "DisableDraw", 0 );
#j = dllfunc( "LockSelection" );
$dir = dllfuncstr( "HomeDir" ) + dllfuncstr( "CurrentAccount" ) + "\\";
#i = 0;
while( #i < #j ){
#tmp = dllfunc( "EnumSelection", 1 );
#attach = dllfunc( "CountCurrentHeader", "X-Attach" );
if( #attach ){
#k = 0;
while( #k < #attach ){
$attach = dllfuncstr( "CurrentHeader", "X-Attach");
#tmp = dllfunc( "DeleteAttach", $attach ,1);
//message $dir + $attach;
#k = #k + 1;
}
}
#i = #i + 1;
}
#tmp = dllfunc( "UnlockSelection", 1 );
#tmp = dllfunc( "EnableDraw" );
freedll;
endmacro;
|
|