ツール内に、 「全てのアカウントのゴミ箱を空にする」 機能ボタン追加希望。

WinXPproSP3/Ver,2.86.3F

いまでもできますよ。

以下マクロで作成（・・を//に置換してください）
私はコンパクションもやっています。
お好みで、、、

以下をall_trashという名前でマクロ登録
・・ *----------------------* Account1のごみ箱フォルダ内の全メッセージ削除
OpenThisFolder( "Account1\\ごみ箱.ctx" ) ;    ・・このフォルダを開く
SelectAllMessage( ) ;                         ・・メッセージをすべて選択
DeleteSelectedMessage( ) ;                    ・・選択中のメッセージを削除



OpenThisFolder( "Account1\\受信.ctx" ) ; ・・ 受信フォルダを開く
CompactCurrentFolder( ) ; ・・現在のフォルダをコンパクション 
ここまで


そのあと
設定項目−各種バー
拡張メニューバー
表示にチェックを

ツールバーのカスタマイズ
設定項目−拡張メニュー

番号：拡張メニュー１
タイトル：ごみ箱を空に

種別：マクロ
を選んで
all_trash選択
追加ボタン
ＯＫでウインドウを閉じる

ツールバーに「ごみ箱を空に」が出現
クリックで。

ramerikaさん　有難う御座いました。

返信を投稿しているのですが、迷惑投稿として処理されるのは何故でしょうか？


WinXPproSP3/Ver,2.86.3F

私も久しぶりに書き込みしたので、
そこでひっかかって最初書き込みできませんでした。

過去ログにそれっぽいことかいてあったので、
それを実行したら書き込めました。

//があるとＵＲＬと判断されて、書き込めないみたいです。
で、一旦パスワード設定でダミー文章を書き込んで、
そのあと、該当番号の記事修正で、本ちゃんの記事をいれれば
//も入るようです。

回答有り難う御座います。
Edmax掲示板サイトから書き込む訳ですね？

ご教示願いたいことが有りますので、教えて頂いた方法でUPしてみます。



WinXPproSP3/Ver,2.86.3F

早速、アカウント 9 個のゴミ箱を空にした後、コンパクションも兼ねて
以下のようにマクロを作ってみました。
何年もクリック動作を繰り返していた事から解放されて喜んでおります。が、
書き方は正しいでしょうか？
無駄や間違いをご教示願います。


質問１、//後の機能説明行も必要なのでしょうか？
----------------------------------------------------------------
// *----------------------* Account1のごみ箱フォルダ内の全メッセージ削除
OpenThisFolder( "Account1\\ごみ箱.ctx" ) ; //このフォルダを開く
SelectAllMessage( ) ; //メッセージをすべて選択
DeleteSelectedMessage( ) ; //選択中のメッセージを削除
// *----------------------* Account2のごみ箱フォルダ内の全メッセージ削除
OpenThisFolder( "Account2\\ごみ箱.ctx" ) ; //このフォルダを開く
SelectAllMessage( ) ; //メッセージをすべて選択
DeleteSelectedMessage( ) ; //選択中のメッセージを削除
　　　　　　 ( 途中、省略 )
// *----------------------* Account9のごみ箱フォルダ内の全メッセージ削除
OpenThisFolder( "Account9\\ごみ箱.ctx" ) ; //このフォルダを開く
SelectAllMessage( ) ; //メッセージをすべて選択
DeleteSelectedMessage( ) ; //選択中のメッセージを削除



OpenThisFolder( "Account1\\受信.ctx" ) ; // 受信フォルダを開く
CompactCurrentFolder( ) ; //現在のフォルダをコンパクション
OpenThisFolder( "Account2\\受信.ctx" ) ; // 受信フォルダを開く
CompactCurrentFolder( ) ; //現在のフォルダをコンパクション
　　　　　　（途中、省略）
OpenThisFolder( "Account9\\受信.ctx" ) ; // 受信フォルダを開く
CompactCurrentFolder( ) ; //現在のフォルダをコンパクション
----------------------------------------------------------------

９アカウントも作っているんですか。
それではごみ箱削除するのもたいへんですね。

構文これで良いと思います。
使い勝手の点でこのマクロを実行し、
終了するとアカウント９の受信フォルダが
セレクトされた状態になってしまうのは
いいのでしょうか？

もし、アカウント１に戻したいなら
最後の行に
OpenThisFolder( "Account1\\ごみ箱.ctx" ) ; //このフォルダを開く
を入れてください。

＞質問１、//後の機能説明行も必要なのでしょうか？
//以降はコメントになるので、動作には入れなくても良いです。
しかし、可読性やパッと見わかるように
また、将来の自分は他人なので、そのためにもいれていたいものです。

同様に、空行も入れてたほうがみやすいです。

ramerika 様
アドバイス、説明　有難う御座いました。

なるほど、
アカウント１に戻る＋コメント＋空行　入れ、
分かりやすく使うことが出来るようになりました。

お気に入りのEdmaxが更に使い易くなり、
私にとって大きなバージョンアップです。

感謝致します。


WinXPproSP3/Ver,2.86.3F

ramerika 様

もう一つ教えて頂きたいのですが、
先のマクロを実行後、全てのスレッドが開いたままとなります。
第一アカウントは開いたままで、それ以降は閉じて終了するには
どうすれば宜しいでしょうか？

一応、マクロコーナーにあるマクロサンプル「スレッドを閉じる」を
適当なところに組み込んでみましたが、期待する動作は得られません
でしたので、現在は、元に戻してあります。

宜しくお願い致します。

WinXPproSP3/Ver,2.86.3F

// Account9 コンパクション後
// 下から閉じていったほうが、画面がちらつかないかも？だから９から
CloseAccount( 9 ) ; //このアカウントのツリーを閉じる
CloseAccount( 8 ) ; //このアカウントのツリーを閉じる
　　　　　以下減算
CloseAccount( 2 ) ; //このアカウントのツリーを閉じる

OpenThisFolder( "Account1\\受信.ctx" ) ; // 受信フォルダを開く

これでどうでしょうか。

ramerika 様

完璧でした。
有難う御座いました。

今後とも宜しくお願いいたします。



WinXPproSP3/Ver,2.86.3F

ramerika 様

その節はお世話になりました。
あれから、便利に使っておりますが、実はコンパクションが完了していないようです。
フォルダ画面では、一連の動作後、ゴミ箱も空になりコンパクションも完了している
様に見えておりましたが、どうも容量が増え続けているようなので、
試しにツール＞コンパクションを起動したところ22MB→17MB と本来のサイズに
なりました。

ツール＞コンパクションを起動した場合、コンパクション終了には数秒掛かっている
ようですが、マクロ動作ではコンパクションは瞬時に終わっている様に見えます。

正常にコンパクションを終了後、次の動作へ移るような記述の仕方があれば
教えて頂けると助かります。

宜しくお願い致します。

WinXPproSP3/Ver,2.86.3F

ramerika 様

追伸：
「ツール＞コンパクション」動作は、正しくは、
「ツール＞コンパクション＞コンパクションの範囲：全てのアカウント＞OK」です。


WinXPproSP3/Ver,2.86.3F

マクロコマンドには私が調べたかぎりでは、
カレントフォルダ（OpenThisFolderでコンパクション直前に開いたフォルダ）
しかコンパクションする機能しかないと思われます。
アカウントをコンパクションするコマンドあればいいんですけど、、、

受信
　├foo1
　│　└foo3
　└foo2

※foo1〜foo3はフォルダ
とある場合は

OpenThisFolder( "Account1\\受信.ctx" ) ; // 受信フォルダを開く
CompactCurrentFolder( ) ; // 現在のフォルダをコンパクション 

OpenThisFolder( "Account1\\受信\\foo1.ctx" ) ; // 受信フォルダを開く
CompactCurrentFolder( ) ; // 現在のフォルダをコンパクション 

OpenThisFolder( "Account1\\受信\\foo1\\foo3.ctx" ) ; // 受信フォルダを開く
CompactCurrentFolder( ) ; // 現在のフォルダをコンパクション 

OpenThisFolder( "Account1\\受信\\foo2.ctx" ) ; // 受信フォルダを開く
CompactCurrentFolder( ) ; // 現在のフォルダをコンパクション 

と、アカウントをコンパクションした場合は、
その中のすべてのフォルダに対してコンパクションを
実行しなければいけないと思います。

ramerika 様

＞その中のすべてのフォルダに対してコンパクションを
実行しなければいけないと思います。

なるほど、原因が判りました。

再びアドバイス頂き有り難う御座いました。



WinXPproSP3/Ver,2.86.3F