同報メール作成No.30427
秀まるお2 さん 07/02/26 14:49
 
 同報メールを作成する用のcloneMail.macの実行を自動でやってくれないかと
いう話があったので、適当なマクロを作って差し上げてユーザー様に送りました。

 同じ話がまた届くかもしれないので、念のためここの会議室にそのマクロ内容
を書いておきます。マクロは、「マクロ・マクロ登録...・自動起動」の「あと
で送信/今すぐ送信時」に登録して使う用です。

 ちなみに同報メール作成マクロとは、sleep-walkerさん作の以下の物のことで
す。

http://hide.maruo.co.jp/lib/tkmacro/clonemail001.html

---------マクロ開始--------------------------------------------------
  loaddll "tkinfo.dll";
  #to = dllfunc("CountEmailList", dllfuncstr("CurrentHeader", "To"));
  #to2 = dllfunc("CountEmailList", dllfuncstr("CurrentHeader2", "To", 1));
  #cc = dllfunc("CountEmailList", dllfuncstr("CurrentHeader", "Cc"));
  #cc2 = dllfunc("CountEmailList", dllfuncstr("CurrentHeader2", "Cc", 1));
  if( #to + #to2 + #cc + #cc2 > 1 ) {
      question "宛先毎に分けてメールを送りますか?";
      if( result == yes ) {
          #n = dllfunc("SendLater");
          #n = dllfunc("SetCancel", 1);
          #n = dllfunc("Sync");
          #handle = hidemaruhandle(0);
          #n = dllfunc("SetMainWndTop");
          closehidemaru #handle;
          execmacro "cloneMail.mac";
      }
  }
---------マクロ終了--------------------------------------------------

[ ]