| |
秀丸メールのテンプレートでも近いことができると思いますが、秀丸エディタから指
示する場合は、Turukame.exeのコマンドラインオプションを指定するといいです。
詳細は、秀丸メールヘルプの起動時のコマンドラインのところにあります。
秀丸エディタのマクロからTurukame.exeの起動でする場合、以下のような感じででき
ました。
hidemaruversion "9.19.99";
//宛先
call GetEmailText;
$email=$$return;
//翌月
$nextmonth=str((val(month)%12)+1);
$nextmonth=filter("","ToZenkakuAlnum","",$nextmonth);//全角の場合
//添付ファイル
//あらかじめ"C:\Folder\７月定例会開催場所の案内図.jpg"とか１２個のファイルを
置いておく
$attach=@"C:\Folder\"+$nextmonth+"月定例会開催場所の案内図.jpg";
if(existfile($attach)==false){
message $attach+"\nがありません。";
endmacro;
}
//本文（クリップボード使用）
setclipboard $nextmonth+"""
月の定例会のご案内をいたします。
（以下、毎月同内容です。）
:
終わり
""";
//32bit版ならC:\Program Files (x86)
run sprintf("""
"C:\Program Files\HidemaruMail\Turukame.exe" newmail To="%s" BodyFile=clip
board Subject="%s" Attach="%s"
"""
, $email
, $nextmonth+"月定例会のご案内"
, $attach
);
endmacro;
GetEmailText:
if(selecting){
//選択
$$text=getselectedtext();
} else if((colorcode&0x00001000 )!=0){
//[その他]→[ファイルタイプ別の設定]→[デザイン]→[表示1]→[メールアドレ
スのカラー表示]の場所
disabledraw;
while(colorcode&0x00001000 ){
left;
if(!result)break;
}
if((x!=0)||(y!=0))right;
##x1=x;
##y1=y;
while(colorcode&0x00001000){
right;
if(!result)break;
}
$$text=gettext(##x1,##y1,x,y);
}
return $$text;
|
|