织梦采用关键字栏目调用相关文章方法

调用相关文章，如果是内容页调用则不包含当前这一篇文章

把下面代码放到模板你想显示的位置

{dede:field.keywords runphp=yes}

global $dsql,$id,$aid;

$aid = isset($id) ? $id : $aid;

$keyword = '';

if(!empty(@me))

{

$keywords = explode(',' , trim(@me));

$keyword = '';

$n = 1;

foreach($keywords as $k)

{

if($n > 3) break;

if(trim($k)=='') continue;

else $k = addslashes($k);

$keyword .= ($keyword=='' ? " CONCAT(arc.keywords,' ',arc.title) LIKE '%$k%' " : " OR CONCAT(arc.keywords,' ',arc.title) LIKE '%$k%' ");

$n++;

}

}

if($keyword != '')

{

$sql = "SELECT arc.*,tp.typedir,tp.typename,tp.corank,tp.isdefault,tp.defaultname,tp.namerule,tp.namerule2,tp.ispart,tp.moresite,tp.siteurl,tp.sitepath FROM `archives` arc LEFT JOIN `arctype` tp ON arc.typeid=tp.id where arc.arcrank>-1 AND ($keyword) AND arc.id<>'$aid' ORDER BY arc.id desc limit 0, 10";

}

$dsql->SetQuery($sql);

$dsql->Execute('t');

$result = '';

while($row = $dsql->GetArray('t'))

{

$arcrow = GetOneArchive($row['id']);

$row['arcurl'] = $arcrow['arcurl'];

$row['pubdate'] = MyDate('Y-m-d',$row['pubdate']);

$row['litpic'] = $row['litpic'] = $row['litpic']=='' ? '/images/defaultpic.gif' : $row['litpic'];

$result .= "<li><a href=\&;{$row['arcurl']}\&;><img src=\&;{$row['litpic']}\&;>{$row['title']}</a></li>";

}

@me = $result;

{/dede:field.keywords}