織夢DedeCms5.7全站按TAG和關(guān)鍵字調(diào)用相關(guān)文章方法，可單用tag來調(diào)用相關(guān)文章，也可用tag+keyword來調(diào)用相關(guān)文章（默認(rèn)tag優(yōu)先于keyword，可以自己排序），非常適合SEO，經(jīng)測試效果極佳。
1.把下邊代碼保存到文章模版的適當(dāng)位置
<div class="xgwz">
<dl class="tbox">
<dt><strong>相關(guān)文章</strong></dt>
<dd>
<ul class="c1 ico2">
{dede:likearticle col='2' row='10' titlelen='42' eregtype=all|tag|keyword}
<li><a href="[field:arcurl/]">[field:title/]</a></li>
{/dede:likearticle}
</ul>
</dd>
</dl>
</div>
2.把下邊的php代碼替換掉include/taglib/likearticle.lib里的代碼
<?php
if(!defined('DEDEINC')) exit('Request Error!');
/*--------------------------------------
按關(guān)鍵詞關(guān)連文章的標(biāo)簽
eregtype屬性
eregtype = keyword 只匹配關(guān)鍵字
eregtype = tag 只匹配tag
eregtype = all tag優(yōu)先，不存在tag則匹配關(guān)鍵字
mytypeid='' 欄目ID,多個欄目用,隔開
---------------------------------------*/
function lib_likearticle(&$ctag,&$refObj)
{
global $dsql;
//屬性處理 來源：http://www.dedecms51.com
$attlist="row|12,titlelen|28,infolen|150,col|1,tablewidth|100,mytypeid|0,byabs|0,imgwidth|120,imgheight|90";
FillAttsDefault($ctag->CAttribute->Items,$attlist);
extract($ctag->CAttribute->Items, EXTR_SKIP);
$revalue = '';
if(empty($tablewidth)) $tablewidth = 100;
if(empty($col)) $col = 1;
$colWidth = ceil(100/$col);
$tablewidth = $tablewidth."%";
$colWidth = $colWidth."%";
$ids = array();
$tids = array();
$typeid = ( !empty($mytypeid) ? $mytypeid : 0 );
if(empty($typeid))
{
if(!empty($refObj->Typelink->TypeInfos['reid'])) {
$typeid = $refObj->Typelink->TypeInfos['reid'];
}
else {
if(!empty($refObj->Fields['typeid'])) $typeid = $refObj->Fields['typeid'];
}
}
if( !empty($typeid) && !ereg(',', $typeid) ) {
$typeid = GetSonIds($typeid);
}
if(!empty($refObj->Fields['tags']) && $eregtype != 'keyword' )
{
$tags = explode(',', addslashes($refObj->Fields['tags']));
$getsql = " tag like '".join("' OR tag like '", $tags)."' ";
$dsql->Execute('me', "Select * From zmb_tagindex where $getsql ");
while($arow = $dsql->GetArray('me')) {
$tids[] = $arow['id'];
}
$tid = join(',', $tids);
if($tid!='')
{
$dsql->Execute("me", "Select aid From zmb_taglist where tid in($tid) And arcrank > -1 group by aid order by aid desc limit 0, $row");
while($arow = $dsql->GetArray("me"))
{
$ids[] = $arow['aid'];
$arcid = $refObj->Fields['aid'];
}
}
}
if($eregtype == 'tag' && count($ids) == 0 )
{
return '';
}
else
{
if(count($ids) > 0)
{
if(!empty($typeid)) {
// $typeid = " And arc.typeid in($typeid) And arc.id<>$arcid "; 調(diào)用整站相關(guān)文章
$typeid = "And arc.id<>$arcid";
}
$idsStr = join(',', $ids);
$query = "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 zmb_archives arc left join zmb_arctype tp on arc.typeid=tp.id
where arc.id in($idsStr) $typeid order by arc.id desc";
}
else
{
$limitRow = $row - count($ids);
$keyword = '';
if(!empty($refObj->Fields['keywords']))
{
$keywords = explode(',' , trim($refObj->Fields['keywords']));
$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++;
}
}
$arcid = (!empty($refObj->Fields['id']) ? $refObj->Fields['aid'] : 0);
if( empty($arcid) || $byabs==0 ) {
$orderquery = " order by arc.id desc ";
}
else {
$orderquery = " order by ABS(arc.id - ".$arcid.") ";
}
if($keyword != '')
{
if(!empty($typeid)) {
$typeid = " And arc.typeid in($typeid) And arc.id<>$arcid ";
}
$query = "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 zmb_archives arc left join zmb_arctype tp on arc.typeid=tp.id
where arc.arcrank>-1 and ($keyword) $typeid $orderquery limit 0, $row";
}
//http://www.dedecms51.com
else
{
if(!empty($typeid)) {
$typeid = " arc.typeid in($typeid) And arc.id<>$arcid ";
}
$query = "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 zmb_archives arc left join zmb_arctype tp on arc.typeid=tp.id
where arc.arcrank>-1 and $typeid $orderquery limit 0, $row";
}
}
}
$innertext = trim( $ctag->GetInnerText() );
if($innertext=='') $innertext = GetSysTemplets('part_arclist.htm');
$dsql->SetQuery($query);
$dsql->Execute('al');
$artlist = '';
if($col > 1) {
$artlist = "<table width='$tablewidth' border='0' cellspacing='0' cellpadding='0'>\r\n";
}
$dtp2 = new DedeTagParse();
$dtp2->SetNameSpace('field', '[', ']');
$dtp2->LoadString($innertext);
$GLOBALS['autoindex'] = 0;
$line = $row;
for($i=0; $i < $line; $i++)
{
if($col>1) $artlist .= "<tr>\r\n";
for($j=0; $j < $col; $j++)
{
if($col>1) $artlist .= " <td width='$colWidth'>\r\n";
if($row = $dsql->GetArray("al"))
{
$ids[] = $row['id'];
//處理一些特殊字段
$row['info'] = $row['infos'] = cn_substr($row['description'],$infolen);
$row['id'] = $row['id'];
if($row['corank'] > 0 && $row['arcrank']==0)
{
$row['arcrank'] = $row['corank'];
}
$row['filename'] = $row['arcurl'] = GetFileUrl($row['id'],$row['typeid'],$row['senddate'],$row['title'],$row['ismake'],
$row['arcrank'],$row['namerule'],$row['typedir'],$row['money'],$row['filename'],$row['moresite'],$row['siteurl'],$row['sitepath']);
$row['typeurl'] = GetTypeUrl($row['typeid'],$row['typedir'],$row['isdefault'],$row['defaultname'],$row['ispart'],
$row['namerule2'],$row['moresite'],$row['siteurl'],$row['sitepath']);
if($row['litpic'] == '-' || $row['litpic'] == '')
{
$row['litpic'] = $GLOBALS['cfg_cmspath'].'/images/defaultpic.gif';
}
if(!eregi("^http://",$row['litpic']) && $GLOBALS['cfg_multi_site'] == 'Y')
{
$row['litpic'] = $GLOBALS['cfg_mainsite'].$row['litpic'];
}
$row['picname'] = $row['litpic'];
$row['stime'] = GetDateMK($row['pubdate']);
$row['typelink'] = "<a href='".$row['typeurl']."'>".$row['typename']."</a>";
$row['image'] = "<img src='".$row['picname']."' border='0' width='$imgwidth' height='$imgheight' alt='".ereg_replace("['><]","",$row['title'])."'>";
$row['imglink'] = "<a href='".$row['filename']."'>".$row['image']."</a>";
$row['fulltitle'] = $row['title'];
$row['title'] = cn_substr($row['title'],$titlelen);
if($row['color']!='') $row['title'] = "<font color='".$row['color']."'>".$row['title']."</font>";
if(ereg('b',$row['flag'])) $row['title'] = "<strong>".$row['title']."</strong>";
$row['textlink'] = "<a href='".$row['filename']."'>".$row['title']."</a>";
$row['plusurl'] = $row['phpurl'] = $GLOBALS['cfg_phpurl'];
$row['memberurl'] = $GLOBALS['cfg_memberurl'];
$row['templeturl'] = $GLOBALS['cfg_templeturl'];
if(is_array($dtp2->CTags))
{
foreach($dtp2->CTags as $k=>$ctag)
{
if($ctag->GetName()=='array') {
$dtp2->Assign($k,$row);
}
else {
if(isset($row[$ctag->GetName()])) $dtp2->Assign($k,$row[$ctag->GetName()]);
else $dtp2->Assign($k,'');
}
}
$GLOBALS['autoindex']++;
}
$artlist .= $dtp2->GetResult()."\r\n";
}
//if hasRow
else
{
$artlist .= '';
}
if($col>1) $artlist .= " </td>\r\n";
}
//Loop Col
if($col>1) $i += $col - 1;
if($col>1) $artlist .= " </tr>\r\n";
}
//loop line
if($col>1) $artlist .= " </table>\r\n";
$dsql->FreeResult("al");
return $artlist;
}
?>
版權(quán)聲明： 本站資源均來自互聯(lián)網(wǎng)或會員發(fā)布，如果侵犯了您的權(quán)益請與我們聯(lián)系，我們將在24小時內(nèi)刪除！謝謝！
轉(zhuǎn)載請注明： 織夢實現(xiàn)全站按TAG和關(guān)鍵字調(diào)用相關(guān)文章教程
本站轉(zhuǎn)載作品版權(quán)歸原作者及來源網(wǎng)站所有，原創(chuàng)內(nèi)容作品版權(quán)歸作者所有，任何內(nèi)容轉(zhuǎn)載、商業(yè)用途等均須聯(lián)系原作者并注明來源。相關(guān)侵權(quán)、舉報、投訴及建議等，請發(fā)E-mail：[email protected]
Copyright © 2002-2011 滕州素材無憂網(wǎng)絡(luò)科技有限公司 版權(quán)所有nbsp; 魯ICP備16003892號-6
魯公網(wǎng)安備37048102006483號
