织梦DedeCms5.7全站按TAG和关键字调用相关文章方法

织梦DedeCms5.7全站按TAG和关键字调用相关文章方法,第1张

概述织梦DedeCms5.7全站按TAG和关键字调用相关文章方法,可单用tag来调用相关文章,也可用tag+keyword来调用相关文章(默认tag优先于keyword,可以自己排序),非常适合SEO,经测试效果极佳。 1.把下边代码保存到文章模版的适当位置 Copy to Clipboard 引用的内

copy to Clipboard

引用的内容: 相关文章 
 
{dede:likearticle col='2' row='10' Titlelen='42' eregtype=all|tag|keyword} 
 
{/dede:likearticle} 
 
 
 

Copy to Clipboard

引用的内容: if(!defined('DEDEINC')) exit('Request Error!'); 
/*-------------------------------------- 
按关键词关连文章的标签 
eregtype属性 
eregtype = keyword 只匹配关键字 
eregtype = tag 只匹配tag 
eregtype = all tag优先,不存在tag则匹配关键字 
mytypeid='' 栏目ID,多个栏目用,隔开 
---------------------------------------*/ 
function lib_likearticle(&$ctag,&$refObj) 

global $dsql; 
//属性处理 
$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 veryhuo_tagindex where $getsql "); 
while($arow = $dsql->GetArray('me')) { 
$tids[] = $arow['id']; 

$tid = join(',$tids); 
if($tid!='') 

$dsql->Execute("me","Select aid From veryhuo_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 "; 调用整站相关文章 
$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 veryhuo_archives arc left join veryhuo_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.sitepath 
from veryhuo_archives arc left join veryhuo_arctype tp on arc.typeid=tp.id 
where arc.arcrank>-1 and ($keyword) $typeid $orderquery limit 0,$row"; 

else 

if(!empty($typeid)) { 
$typeid = " arc.typeid in($typeid) And arc.id<>$arcid "; 

$query = "Select arc.*,tp.sitepath 
from veryhuo_archives arc left join veryhuo_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 = "\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 .= "for($j=0; $j < $col; $j++) 

if($col>1) $artlist .= "
\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['isdefault'],$row['defaultname'],$row['ispart'],
$row['namerule2'],$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'] = "".$row['typename'].""; 
$row['image'] = "} 
//Loop Col 
if($col>1) $i += $col - 1; 
if($col>1) $artList .= " } 
//loop line 
if($col>1) $artList .= " $dsql->FreeResult("al"); 
return $artList; 

?>
总结

以上是内存溢出为你收集整理的织梦DedeCms5.7全站按TAG和关键字调用相关文章方法全部内容,希望文章能够帮你解决织梦DedeCms5.7全站按TAG和关键字调用相关文章方法所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错,欢迎将内存溢出网站推荐给程序员好友。

欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/zz/1015327.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2022-05-22
下一篇 2022-05-22

发表评论

登录后才能评论

评论列表(0条)