phpが動きません
<SCRIPT LANGUAGE="PHP">
// Copyright (C) 2001-2004 All right reserved by Shinya Kondo ( CGI KON )
// 検索用関数
Function Search_Pattern($record,$pattern)
{
for($loop = 0;$loop < count($pattern);$loop++) {
if($pattern[$loop] == "") continue;
if(!ereg($pattern[$loop],$record)) return 0;
}
return 1;
}
// メインプログラム
if($search) {
if(!$keyword) {
$error = "キーワードが入力されていません";
$search = "";
}
}
if($search) {
$fp = @fopen("search_csv.csv","r");
if(!$fp) {
$error = "該当ファイルを参照できません";
$search = "";
}
}
</SCRIPT>
<HTML>
<HEAD>
<META Http-Equiv="Content-Type" Content="text/html;charset=EUC-JP">
<TITLE>ファイル簡易検索</TITLE>
</HEAD>
<BODY>
<B>ファイル簡易検索</B>
<BR>
<CENTER>
<FORM ACTION="search_csv.php" METHOD="post">
<INPUT TYPE="hidden" NAME="search" VALUE="検索する">
キーワード：
<INPUT TYPE="text" NAME="keyword" VALUE="<? echo $keyword; ?>" SIZE="30">
<INPUT TYPE="submit" NAME="search" VALUE="検索する">
</FORM>
<FONT COLOR="#FF0000"><? echo $error; ?></FONT>
<HR>
<P>
<SCRIPT LANGUAGE="PHP">
if($search) {
echo "<TABLE BORDER=1>\n";
while(!feof($fp)) {
$buff = fgets($fp,255);
$title .= $buff;
if(ereg("\n",$buff)) break;
}
$title = ereg_replace("\x0A","",$title);
$column = split(",",$title);
echo "<TR>\n";
for($loop = 0;$loop < count($column);$loop++) {
echo '<TD BGCOLOR="#00FFFF" NOWRAP>',$column[$loop],"</TD>\n";
}
echo "</TR>\n";
$keyword = ereg_replace(" "," ",$keyword);
$pattern = split(" ",$keyword);
while(1) {
$line = "";
while(!feof($fp)) {
$buff = fgets($fp,255);
$line .= $buff;
if(ereg("\n",$buff)) break;
}
if($line == "") break;
if(!Search_Pattern($line,$pattern)) continue;
$line = ereg_replace("\x0A","",$line);
$column = split(",",$line);
echo "<TR>\n";
for($loop = 0;$loop < count($column);$loop++) {
echo "<TD>",$column[$loop],"</TD>\n";
}
echo "</TR>\n";
}
fclose($fp);
echo "</TABLE>\n";
} else {
echo "キーワードを入力し、検索ボタンを押すと検索結果がここに表示されます。\n";
}
</SCRIPT>
<P>
<FONT SIZE=2><I>
Copyright (C) 2001-2004 All right reserved by <A HREF="http://cgikon.com">CGI KON</A>
</I></FONT>
</CENTER>
</BODY>
</HTML>
フリー配布のphpをチェックしているのですが、なぜかこのphpだけ動きません。
csvファイル名もそのままでftpにあげています。
他のphpは問題なくうごいているのですが、原因がわかりません。
ご教授願います。
お礼
ありがとうございます忘れてました