$Name
Email: $Email
主页: $Website
留言: $Comments
发表时间: $Today

.:::."; //将新信息添加到原有的信息之前 $New = $Input.$OldData; //覆盖写入文本文件 $fp = fopen( $filename,"w+"); fwrite($fp, $New, 80000); fclose( $fp ); } //格式化输出要传送给FLASH动画显示的信息 //指定文本文件的文件名 $filename = "GuestBook.txt"; //产生一个操作该文件的句柄 $fp = fopen( $filename,"r"); $Data = fread($fp, 80000); fclose( $fp ); //根据分隔符“.:::.”将文件中的内容分开，并存入一个数组 $DataArray = split (".:::.", $Data); //获得文本文件中纪录的条数 $NumEntries = count($DataArray) - 1; //输出信息给FLASH动画 print "&TotalEntries=$NumEntries&NumLow=$NumLow&NumHigh=$NumHigh&GuestBook="; for ($n = $NumLow; $n < $NumHigh; $n++) { print $DataArray[$n]; if (!$DataArray[$n]) { Print "

没有更多的留言了！"; exit; } } ?>