| |
> また，鶴亀メールから送信する場合，References は最新の Message-Id
> １つだけ残しそれ以外削除してしまいますが，これも無制限とまでは言
> いませんがある程度残して送信するようにして頂くことはできないもの
> でしょうか？
私はマクロでやってます。
以下、いろいろやってる中からの抜き出しなので、そのままでは
動かないでしょうが、まぁ「こんな感じ」ということで。
----
$s = dllfuncstr( "CurrentHeader", "References" );
$d = dllfuncstr( "RootHeader", "References" );
if( $s != "" && $d != "" ) {
$s = $d + "\n " + $s;
call formmsgid $s;
$s = $$return;
$s = dllfuncstr( "SetHeader", "References", $s );
}
...
// References用 メッセージID整形
// "<...>"を１行ごとに切り出す。
// ２行目以降は、行頭にTABを付ける。
formmsgid:
$$s = $$1;
$$t = "";
$$bra = "<";
$$ket = ">";
##bra_len = strlen( $$bra );
##ket_len = strlen( $$bra );
while( true ) {
##bra_loc = strstr( $$s, $$bra );
##ket_loc = strstr( $$s, $$ket );
if( ##bra_loc >= 0 && ##ket_loc >= 0 && ##bra_loc < ##ket_loc ) {
$$msgid = midstr( $$s, ##bra_loc, ##ket_loc - ##bra_loc + ##ket_
len );
if( $$t != "" ) {
$$t = $$t + "\t";
}
$$t = $$t + $$msgid + "\n";
$$s = midstr( $$s, ##ket_loc + ##ket_len, strlen($$s) - ##ket_lo
c - ##ket_len );
} else {
break;
}
}
return $$t;
|
|