フォルダ内全MSGをmbx形式で保存

• スレッドの開閉状態に関わらず、選択フォルダ内の全メッセージをmbx形式で保存します。
• 保存時に「名前をつけて保存」ダイアログが表示され、保存する場所、ファイル名等の変更が可能です。(サンプルのデフォルトは c:\temp\Temp.mbx となっています。)

• 対応メッセージ数の最大値は 9999メッセージ です。
• 本マクロは「結合してビューを開く」のセパレータを置換し、mbx形式にしています。このためメッセージ内にセパレータと同形式の文字が含まれている場合は、正しく動作しない場合があります。
  「結合してビューを開く」のセパレータは、下記形式となっています。
  -------------------------------------------------- [9/9]
  -------------------------------------------------- [9999/9999]
  (もっとスマートな置換方法をご存知の方がおりましたら、ご教授願います。連絡先は silksprite@yahoo.co.jp です。)

// Start of EdMax Macro
CHAR MacroComment[] = "指定フォルダの全MSGをText出力\r\n2002/03/12"
// #----------------------* Prolog
SaveMailEditHeaderEditMode( ) ;     //保存:メール編集+ヘッダ編集
OnHeaderEdit( ) ;                   //ON:メール編集+ヘッダ編集
SaveCurrentFindCondition( ) ;       //保存:検索条件
// #----------------------* フォルダ内Msgを結合しTextMsg.txtへ貼り付け
SelectAllMessage( ) ;               //メッセージをすべて選択
OpenAllThread( ) ;                  //すべてのスレッドを開く
SelectAllMessage( ) ;               //メッセージをすべて選択
OpenEditViewCombined( ) ;           //結合してビューを開く
ReplaceString( 2 , TRUE , TRUE , TRUE , TRUE , FALSE , FALSE , FALSE , "-+ \\[[1-9][0-9][0-9][0-9]/[1-9][0-9][0-9][0-9]\\]$" , "\\n.\\n" ) ;
ReplaceString( 2 , TRUE , TRUE , TRUE , TRUE , FALSE , FALSE , FALSE , "-+ \\[[1-9][0-9][0-9]/[1-9][0-9][0-9][0-9]\\]$" , "\\n.\\n" ) ;
ReplaceString( 2 , TRUE , TRUE , TRUE , TRUE , FALSE , FALSE , FALSE , "-+ \\[[1-9][0-9][0-9]/[1-9][0-9][0-9]\\]$" , "\\n.\\n" ) ;
ReplaceString( 2 , TRUE , TRUE , TRUE , TRUE , FALSE , FALSE , FALSE , "-+ \\[[1-9][0-9]/[1-9][0-9][0-9][0-9]\\]$" , "\\n.\\n" ) ;
ReplaceString( 2 , TRUE , TRUE , TRUE , TRUE , FALSE , FALSE , FALSE , "-+ \\[[1-9][0-9]/[1-9][0-9][0-9]\\]$" , "\\n.\\n" ) ;
ReplaceString( 2 , TRUE , TRUE , TRUE , TRUE , FALSE , FALSE , FALSE , "-+ \\[[1-9][0-9]/[1-9][0-9]\\]$" , "\\n.\\n" ) ;
ReplaceString( 2 , TRUE , TRUE , TRUE , TRUE , FALSE , FALSE , FALSE , "-+ \\[[1-9]/[1-9][0-9][0-9][0-9]\\]$" , "\\n.\\n" ) ;
ReplaceString( 2 , TRUE , TRUE , TRUE , TRUE , FALSE , FALSE , FALSE , "-+ \\[[1-9]/[1-9][0-9][0-9]\\]$" , "\\n.\\n" ) ;
ReplaceString( 2 , TRUE , TRUE , TRUE , TRUE , FALSE , FALSE , FALSE , "-+ \\[[1-9]/[1-9][0-9]\\]$" , "\\n.\\n" ) ;
ReplaceString( 2 , TRUE , TRUE , TRUE , TRUE , FALSE , FALSE , FALSE , "-+ \\[[1-9]/[1-9]\\]$" , "\\n.\\n" ) ;
SaveMessageToFileAs( "C:\\TEMP\\Temp.mbx" ) ;
// #----------------------* Epilog
RestoreMailEditHeaderEditMode( ) ;  //復元:メール編集+ヘッダ編集
RestoreCurrentFindCondition( ) ;    //復元:検索条件
// End of EdMax Macro