// 説明はenv.datを参照
include "env.dat";
$number = $_GET[number];
////////////////////////////////////// 質問書き込み部分 ////////////////////////////////////
// フォームからの$checkがsubmitの場合のみ書き込み
if ($check=="submit"){
//入力されたデータをEUCに変換
$form_name=i18n_convert($form_name, "EUC-JP", "auto");
$form_subject=i18n_convert($form_subject, "EUC-JP", "auto");
$form_date=i18n_convert($form_date, "EUC-JP", "auto");
$form_com=i18n_convert($form_com, "EUC-JP", "auto");
//タグを無効に
$form_name=htmlspecialchars($form_name);
$form_subject=htmlspecialchars($form_subject);
//改行コードを
に変換
$form_com=htmlspecialchars($form_com);
$form_com=ereg_replace("\r\n","
",$form_com);
$form_com=ereg_replace("\r","
",$form_com);
$form_com=ereg_replace("\n","
",$form_com);
//一行で保存するためにデータの整形「\t区切り」
$data="$form_name\t$form_subject\t$form_email\t$form_date\t$form_com"."\n";
//ファイルオープン
$aFILENAME=$number.".a";
$aFILE = fopen($dat_dir.$aFILENAME, "a");
flock($aFILE, 2);
fputs($aFILE, $data);
flock($aFILE, 3);
fclose($aFILE);
}
////////////////////////////////////// 表示部分 ////////////////////////////////////
//
//表題部
$qFILENAME=$number.".q";
if ($number) { //
$q_strings = file($dat_dir.$qFILENAME);
$q_name = $q_strings[0]; //表題
$q_subject = $q_strings[1]; //発言者
$q_email = $q_strings[2]; //email
$q_date= $q_strings[3]; //日付
$q_com = $q_strings[4]; //コメント
}
$q_com=ereg_replace("(s?https?://[-_.!~*'()a-zA-Z0-9;/?:@&=+$,%#]+)","\\1",$q_com);
?>
| $q_subject $br "; echo " $q_com$br"; echo " | $br";
echo "
| ©2001 ahref.org |