| 記事No | ： 15012 |
| 投稿日 | ： 2016/07/23(Sat) 11:27:57 |
| タイトル | ： clipmailで通し番号 |
| ID情報 | ： y8520 |
| 投稿者 | ： ゆうた |
| URL | ： http:// |
いつもお世話になっております。
Clipmailについて教えてください。
Clipmailで通し番号（受付番号）をつけ痛いのですが
どのようにすれば良いでしょうか？
CSVとメール（管理宛・送信者宛）に表示させたいです。
（Postmailであれば色々と情報が出てくるのですが申し訳ありません）
よろしくお願いいたします。
| 記事No | ： 15013 |
| 投稿日 | ： 2016/07/23(Sat) 15:43:29 |
| タイトル | ： Re: clipmailで通し番号 |
| ID情報 | ： hirayama |
| 投稿者 | ： hirayama |
clipmail.cgi 443行目あたりの
seek(DAT, 0, 0);
print DAT "date=$date1<>ip=$addr<>$log\n";
を
$cf{count} = './data/count.dat';
if (!-f $cf{count}) {
open(COUNT,">$cf{count}");
close(COUNT);
}
open(COUNT,">>$cf{count}");
print COUNT "1";
close(COUNT);
my $count = (stat($cf{count}))[7];
$cf{subject} .= '(問い合わせ番号' . sprintf("%05d",$count) . ')';
$cf{sub_reply} .= '(問い合わせ番号' . sprintf("%05d",$count) . ')';
seek(DAT, 0, 0);
print DAT "count=$count<>date=$date1<>ip=$addr<>$log\n";
のように書き換えれば、ログファイルにも通し番号が保存されると思います。
上記の例ではメールのタイトルに通し番号が表示されます。
| 記事No | ： 15014 |
| 投稿日 | ： 2016/07/23(Sat) 17:32:21 |
| タイトル | ： Re^2: clipmailで通し番号 |
| ID情報 | ： y8520 |
| 投稿者 | ： ゆうた |
| URL | ： http:// |
hirayama様
ありがとうございます。
メールタイトルに表示ができました。感謝いたします。
本文にも記入したい場合はどのようにすれば良いでしょうか？
申し訳ありませんが、よろしくお願いいたします。
> clipmail.cgi 443行目あたりの
>
> seek(DAT, 0, 0);
> print DAT "date=$date1<>ip=$addr<>$log\n";
>
> を
>
> $cf{count} = './data/count.dat';
> if (!-f $cf{count}) {
> open(COUNT,">$cf{count}");
> close(COUNT);
> }
> open(COUNT,">>$cf{count}");
> print COUNT "1";
> close(COUNT);
> my $count = (stat($cf{count}))[7];
> $cf{subject} .= '(問い合わせ番号' . sprintf("%05d",$count) . ')';
> $cf{sub_reply} .= '(問い合わせ番号' . sprintf("%05d",$count) . ')';
>
> seek(DAT, 0, 0);
> print DAT "count=$count<>date=$date1<>ip=$addr<>$log\n";
>
> のように書き換えれば、ログファイルにも通し番号が保存されると思います。
> 上記の例ではメールのタイトルに通し番号が表示されます。
| 記事No | ： 15016 |
| 投稿日 | ： 2016/07/24(Sun) 00:00:47 |
| タイトル | ： Re^3: clipmailで通し番号 |
| ID情報 | ： hirayama |
| 投稿者 | ： hirayama |
./tmplディレクトリのmail.txt、reply.txtそれぞれ
通し番号を表示したい場所に
!count!
というような文字を追加し、clipmail.cgiの先の修正の
my $count = の行の下に
my $count_str = '問い合わせ番号' . sprintf("%05d",$count);
を追加し、さらに
# 本文テンプレ内の変数を置き換え
$mail =~ s/!message!/$mbody/;
の下に
$mail =~ s/!count!/$count_str/;
# 返信テンプレ内の変数を置き換え
$reply =~ s/!message!/$mbody/ if ($cf{auto_res});
の下に
$reply =~ s/!count!/$count_str/ if ($cf{auto_res});
を追加します。
| 記事No | ： 15017 |
| 投稿日 | ： 2016/07/24(Sun) 00:51:27 |
| タイトル | ： Re^4: clipmailで通し番号 |
| ID情報 | ： y8520 |
| 投稿者 | ： ゆうた |
ありがとうございました！
無事挿入することができました。感謝いたします。
> ./tmplディレクトリのmail.txt、reply.txtそれぞれ
> 通し番号を表示したい場所に
> !count!
> というような文字を追加し、clipmail.cgiの先の修正の
> my $count = の行の下に
>
> my $count_str = '問い合わせ番号' . sprintf("%05d",$count);
>
> を追加し、さらに
>
> # 本文テンプレ内の変数を置き換え
> $mail =~ s/!message!/$mbody/;
>
> の下に
> $mail =~ s/!count!/$count_str/;
>
> # 返信テンプレ内の変数を置き換え
> $reply =~ s/!message!/$mbody/ if ($cf{auto_res});
>
> の下に
>
> $reply =~ s/!count!/$count_str/ if ($cf{auto_res});
>
> を追加します。