| |
恭平2さん，こんばんは。
３人分だと次のような感じです。必要に応じてヘッダ，メニューの数を適宜
書き替えればいいでしょう。
//--------- SetHeader.mac -------------------------------------------//
loaddll "tkinfo.dll";
if( dllfunc( "IsTuruKameMain") ) {
message "エディタ上で使用してください。";
endmacro;
}
menu "&1 Ａさん",
"&2 Ｂさん",
"&3 Ｃさん";
if( result == 1 ) call Header1;
else if( result == 2 ) call Header2;
else if( result == 3 ) call Header3;
endmacro;
Header1:
$s = dllfuncstr( "SetHeader", "From", "bbb@xyz" );
$s = dllfuncstr( "SetHeader", "To", "aaa@xyz" );
$s = dllfuncstr( "SetHeader", "Subject", "ＡＡＡ" );
$s = dllfuncstr( "SetHeader", "Cc", "acc@xyz" );
$s = dllfuncstr( "SetHeader", "Bcc", "abcc@xyz" );
return;
Header2:
$s = dllfuncstr( "SetHeader", "From", "bbb@xyz" );
$s = dllfuncstr( "SetHeader", "To", "山紫水明 <bbb@xyz>" );
$s = dllfuncstr( "SetHeader", "Subject", "ＢＢＢ" );
$s = dllfuncstr( "SetHeader", "Cc", "bcc@xyz" );
$s = dllfuncstr( "AddHeader", "Cc", "bbcc@xxx" );
$s = dllfuncstr( "SetHeader", "Bcc", "bbcc@xyz" );
return;
Header3:
$s = dllfuncstr( "SetHeader", "From", "bbb@xyz" );
$s = dllfuncstr( "SetHeader", "To", "ccc@xyz", "ddd@yyy" );
$s = dllfuncstr( "SetHeader", "Subject", "ＣＣＣ" );
$s = dllfuncstr( "SetHeader", "Cc", "acc@xyz" );
$s = dllfuncstr( "SetHeader", "Bcc", "abccc@xyz" );
$s = dllfuncstr( "AddHeader", "Bcc", "ddccee@xyz" );
return;
//-----------------------------------------------------------------//
では， (^^)/~
山紫水明（ユーザー）
SANSHISUIMEI
|
|