"); print("戻る"); exit; } for($q_num=0; $q_num<$q_max; $q_num++){ $ans= $_POST["ans-$q_num"]; if($ans== ""){ print("記入漏れがありますので、再度入力し直してください。　　戻る"); $err_q= $q_num+1; // print("ans-$err_q"); exit; } } //結果格納 $ext = $ext.$stdno.","; for($q_num=0; $q_num<$q_max; $q_num++){ $ans= $_POST["ans-$q_num"]; if($q_num!= $q_max-1){ $ext = $ext.$ans."," ; } else{ $ext = $ext.$ans."\n"; } } $message= $_POST['message']; $ext = $ext.$message."\n"; //log生成 $strDat= strftime("%Y-%B-%D %I:%M:%S %Z"); //ログファイルへの書き込みの準備 $filename = 'log.txt'; $csvfilename= 'result.csv'; $answer = "$ext"; $log = $strDat.","."$ext"; if (is_writable($filename)) { // $filenameを追加モードでオープン if (!$handle = fopen($filename, 'a')) { print ("Cannot open file ($filename)"); exit; } // オープンしたファイルに$logを書き込む if (!fwrite($handle, $log)) { print ("Cannot write to file ($filename)"); exit; } } else { //ログファイルに書き込めない場合エラーを出力 print ("The file $filename is not writable"); } if (is_writable($csvfilename)) { // $csvfilenameを追加モードでオープン if (!$handle1 = fopen($csvfilename, 'a')) { print ("Cannot open file ($filename)"); exit; } // オープンしたファイルに$answerを書き込み if (!fwrite($handle1, $answer)) { print ("Cannot write to file ($csvfilename)"); exit; } print(""); print "ご協力ありがとうございました。ブラウザを終了してください。"; fclose($handle1); } else { // csvファイルに書き込めない場合エラーを出力 print ("The file $csvfilename is not writable"); } } //アンケート画面を表示するためのファンクション function disp(){ global $question, $q_data, $q_max,$q_cmax; print(""); print ("
"); print("

論理学と自然言語　アンケート

"); print ("以下の各質問に対して５つの選択肢の中から一つ答えを選んでください。すべてに答え終わったら送信ボタンを押してください。
"); print(""); for($point=1;$point<$q_cmax; $point++){ print(""); } print(""); } print(""); print("
"); print ("
"); $st=$q_num+1; print("Q$st.{$q_data[$q_num][0]}
{$q_data[$q_num][$point]}
"); $st=$q_num+1; print ("Q$st.感想や意見がありましたら以下に記入してください。
"); print ("

学籍番号"); print ("

"); print ("
"); } if ($_GET['mode']=="send"){ outp(); }else{ disp(); } ?>