実際の動作フレーム分割をするトップ<html>
<head>
<title>フレームテスト</title>
</head>
<frameset rows="50,*">
<frame src="source_chat2.php" name="frame2" frameborder=0>
<frame src="source_chat3.php" name="frame3" frameborder=0>
</frameset>
</html>
フレーム1つ目<?
//########################################
//##### 元々取得しておく項目 #####
//########################################
$user_name = "test";
include("config.php");
require("function.php");
//チャットを記述するパスを設定
$chat_path = "main.txt";
//チャットの記述かどうかフラグを立てる
$chat_write = $_POST["chat_write"];
if($chat_write==""){
$chat_write = 0;
}
//チャットフォームの呼び出し
chat($chat_path,$user_name,$chat_write);
//チャットを呼び出し・書き込みする関数
function chat($chat_path,$user_name,$chat_write){
//送信ボタンのインタフェース
global $chat_form;
//チャットを記述する場合は書き込みする
if($chat_write == 1){
//書き込みメッセージを取得する
$chat_message = $_POST["chat_message"];
//入力情報をチェックする
$chat_message = strip_tags($chat_message);
$chat_message = str_replace("\n","",$chat_message);
$chat_message = trim($chat_message);
if($chat_message==""){
//空欄の場合は処理を中止する
$chat_error = "メッセージを記述して下さい。";
}
else{
//ログ情報を取得する
include("time.php");
$chat_time = $time1 . "(" . $time2 . ")";
//ログ情報を纏める
$chat_message = $user_name."\t".$chat_time."\t".$chat_message."\t".$ip."\t".$host."\n";
//書き込み内容を保存する
file_mode($chat_path,"aa",$chat_message);
}
}
//チャット画面の生成
print "<table><tr><td>";
print "<form action=\"\" method=\"POST\">
メッセージ：<input type=\"text\" name=\"chat_message\" size=\"40\">
<input type=\"hidden\" name=\"chat_write\" value=\"1\">
</td><td>
<input type=\"submit\" name=\"send\" value=\"送信\" $chat_form> <a href=\"source_chat.php\">更新</a></td>
<tr><td colspan=2>
<hr class=chat></td></tr>";
print "</form>";
print "<tr><td colspan=2>".$chat_contents."</td></tr></table>";
}
フレーム2つ目<?
print "<meta http-equiv=\"Refresh\" content=\"5;URL=\">";
//チャットを記述するパスを設定
$chat_path = "main.txt";
//チャットファイルがあれば表示する
if(!file_exists($chat_path)){}
else{
$i=0;
$templog = file($chat_path);
//最新の30メッセージを表示する
while($templog[$i]!="" && $i<30){
//チャットのログを読み取る
list($name,$zikan,$message,$ip,$host)=explode("\t",$templog[$i]);
//チャットの内容を纏める
$chat_contents = $chat_contents .$name."：".$message."<br>";
$i=$i+1;
}
}
print $chat_contents;
?>
