|
>>私はとりあえず、マクロでオリジナルのTo:,Cc:ヘッダを取得して本文中に
>>挿入させるようにしました。
>
>ぜひこのマクロ公開して欲しいです。
>
>マクロでの使い勝手はどうでしょう?
>マクロで十分用が足りるならマクロで実現したほうが良いと思いますが…。
>#秀まるおさんに負担をかけないためにも。
全くの自分用として作ったのであまり公開するのは恥ずかしいのですが。
もし使われる場合には、自分好みにカスタマイズしてください。
なおこのマクロではオリジナルの情報はまったくすげ替えてしまってます。
//-------forward.mac--転送用マクロ
loaddll "TKInfo.dll" ;
$dummy = dllfuncstr("SwitchOrikaeshi");
moveto 0,0 ;
$Subject_header = dllfuncstr("RootHeader","Subject");
$From_header = dllfuncstr("RootHeader","From");
$Date_header = dllfuncstr("RootHeader","Date");
$To_header = dllfuncstr("RootHeader","To");
$Cc_header = dllfuncstr("RootHeader","Cc");
searchdown "^----- Original Message -----", word, regular ;
insert "\"" + $From_header + "\"さんからのメールを転送します\n" ;
down ;
beginsel ;
searchdown "^\n", word, regular ;
delete ;
//insert "% From: " + $From_header + "\n" ;
insert "% Subject: " + $Subject_header +"\n" ;
insert "% Date: " + $Date_header + "\n" ;
if ( $To_header != "" ) insert "% To: " + $To_header + "\n" ;
if ( $Cc_header != "" ) insert "% Cc: " + $Cc_header + "\n" ;
moveto 0,2 ;
また返信時に元メールのタイトルと日付を入れたくて作った返信用マクロを
ついでなので書いておきます。
//-------reply.mac--返信用マクロ
loaddll "TKInfo.dll" ;
$dummy = dllfuncstr("SwitchOrikaeshi");
moveto 0,0 ;
$Subject_header = dllfuncstr("RootHeader","Subject");
$From_header = dllfuncstr("RootHeader","From");
$Date_header = dllfuncstr("RootHeader","Date");
searchdown ">" ;
insert "\n" ;
insert "\"" + $From_header + "\" wrote : \n" ;
insert "% Subject: " + $Subject_header +"\n" ;
insert "% Date: " + $Date_header + "\n\n" ;
moveto 0,2 ;
|
|