<?php

/*
	[插件名稱] 最新圖文評論 - 替換模版標簽{#modCpCommentList#}
	[適用范圍] 全站
	[文 件 名] CpCommentList.php
	[更新時間] 2006/8/11
*/

function CpCommentList(){

	global $fsql,$charset,$tbl_comment,$CatchOpen;
	global $strMore,$NowMenuid,$MenuInfo;

		$PSET=PlusSet("modCpCommentList");

		$shownums=PlusDef($PSET["shownums"],"5");
		$ord=PlusDef($PSET["ord"],"id");
		$sc=PlusDef($PSET["sc"],"desc");
		$showtime=PlusDef($PSET["showtime"],"Y-m-d");
		$cutword=PlusDef($PSET["cutword"],"0");
		$target=PlusDef($PSET["target"],"_self");
		$onlytj=PlusDef($PSET["onlytj"],"0");
		$more=PlusDef($PSET["showmore"],$strMore);
		$tempname=PlusDef($PSET["tempname"],"tpl_list.htm");

		$showmenuid=MenuDef("cp",$NowMenuid);
		
		$scl=" fabu='1' and coltype='cp' and pid='0' ";

		if($showmenuid!="0" && $showmenuid!=""){
			$scl.=" and menuid='$showmenuid' ";
			$morelink=ROOTPATH."comment.php?nowmenuid=$showmenuid";
		}else{
			$morelink=ROOTPATH."comment.php?coltype=cp";
		
		}

		if($onlytj=="1"){
			$scl.=" and tuijian='1' ";
		}

		//模版解釋
		$Temp=LoadTemp(ROOTPATH."templates/".$MenuInfo["skin"]."/".$tempname);
		$TempArr=SplitTblTemp($Temp);

		$str=$TempArr["start"];

		$kk=0;
		$fsql->query("select * from $tbl_comment where $scl order by $ord $sc limit 0,$shownums");

		while($fsql->next_record()){
			
			$id=$fsql->f('id');
			$rid=$fsql->f('rid');
			$title=$fsql->f('title');
			$menuid=$fsql->f('menuid');
			$dtime=$fsql->f('uptime');
			$author=$fsql->f('name');
			$cl=$fsql->f('cl');

					
			$dtime=date($showtime,$dtime);
			if($cutword!="0"){$title=csubstr($title,0,$cutword,$charset);}

			$link=ROOTPATH."comment_detail.php?commentid=$id";

			$var=array (
			'title' => $title, 
			'dtime' => $dtime, 
			'author' => $author, 
			'cl' => $cl, 
			'link' => $link,
			'target' => $target
			);
			$str.=ShowTplTemp($TempArr["list"],$var);


		$kk++;

		}

		$str.=$TempArr["end"];

		$morestr=str_replace("{#more#}",$more,$TempArr["more"]);
		$morestr=str_replace("{#morelink#}",$morelink,$morestr);
		
		$str.=$morestr;

		return $str;

}

?>