人大複印資料處理程序_查詢篇_PHP教程

//本程式為一個搜索，目前設計服務於文章庫。
//編者：孔秀祥。日期：2001/4/10
if(!$UploadAction):
require "config.php3";
if(!isset($table)){
//$table="artical ";
}
/*
$link_id=@MYSQL_CONNECT($hostname,$dbusername,$dbpassword) OR DIE("無法連接資料庫！");
@mysql_select_db("$dbname"無法連接資料庫！");
@mysql_select_db("$dbname" ) or die("不能選擇資料庫！");
$q="select count(id) from $table where 1 ";
$result = @mysql_query($q);
$row = @mysql_fetch_array($result);
  $r_count=$row["count(artical_id)"];
*/   

?>

ACTION= " $PHP_SELF ?>" METHOD = "POST">

本程式運作較費時間，需要耐心等待。
查詢項目
文章內容 文章標題 文章作者 期刊名稱
搜尋內容
索引檔名
索引標題
文章分類	?語言理論 歷史學 中國哲學 其他 ? SELECT>

else:

require "config.php3";
$UploadAction=0;
$added=0;
$die=0;
$single_chinese=0;
$TimeLimit=0; /*設定超時限制時間缺省時間為30秒設定為0時為不限時* /
set_time_limit($TimeLimit);

if($data_search==""){
//做全庫的索引
header("location:progsdata_index.php3");
//$msg="搜尋內容不能為空。";
//xueroom_error_exit($msg,$PHP_SELF);
}


$link_id=@MYSQL_CONNECT( $hostname,$dbusername,$dbpassword) OR DIE("不能連接資料庫！");
@mysql_select_db("$dbname") or die("不能選擇資料庫！ ");
//SELECT id,file_name,artical_author from textfile where 1 LIMIT 0, 30   
if($table=="artical")
{
$sid="artical_id";
$stitle="artical_title";
$sauthor="artical_author";
$sdata="artical_data";
$prog="readfile.php3";
if($a_data== "month" )
    $key_where="where origin_periodical rlike '^.*$data_search.*'";
}
if($a_data ="data" )
}. $sdata rlike '^.*$data_search.*'";
if($a_data=="title" )
    $key_where="where $stitle rlike '^.*$data_search.*'";
if($a_data=="author" )
    $key_where="where $sauthor rlike '^.*$data_search.*'";

//$q="select $sid, $stitle,$sauthor from $table where $sdata rlike '^.*$data_search.*'order by $stitle";
if(($a_data=="data")&&(strlen($data_search)== 2)){
    $q="select $sid,$stitle,$sauthor,$sdata from $table $key_where order by $stitle";
    $single_chinese=1;
 {
    $q="select $sid,$stitle,$sauthor from $table $key_where order by $stitle";
}
$index_data="";
$count=0;
$result =@ mysql_query($q);

if(!$result){
    $msg="沒有符合要求的記錄。 ";
    xueroom_error_exit($msg,$PHP_SELF);
}
while($row = @mysql_fetch_array($result)) {
 ingle(Str [$sdata],$data_search)))
  continue;
  else
  {
    $id=$row[$sid 🎜>      $author=$row[$sauthor];
      if($table=="textfile")
      //  $data=$row["artical_data"];
  //if(myStrPos($data,$data_search)) //可用來尋找單一漢字。 $data_search)){  //大於一個漢字時採用本判斷式，速度較快。
      $index_data.=" $title 作者：$author 」;
      $count ;
  //fputs($fp, " $title 作者：$author ");
// }
}
  }
@mysql_free_result($result);
mysql_close($link_id);
; set_time_limit(30);
if($index_title==""){
$index_title="學而齋資料";
$index_title=$index_title."_".$data_search ;

$html_header=""
$html_header.="

$index_title h5>rn";
$dte_created=date('Y-m-d H:i:s');
$html_header.="$index_describe 發現$count條/查詢日期：$dte_created

---

rn";
$html_header.="

rn";
$data=$html_header.$index_data;
$data .=""
/*If(strlen($index_file)==0){
header("內容類型：text/html"); >   回顯$data;
   }
   其他
   {
$in_file="$index_file";
$index_file="index".$index_file
$fp=index( $index. ;
fputs($fp, "發現了 $count 條");
fputs($fp, "查詢日期：$dte_created

---

rn");
fputs($fp,"rn");
fputs($fp, $index_data);
fputs($fp, "