dedecms织梦模板利用tag调用相关文章的教程

rn";if($row = $dsql->GetArray("al")){$IDs[] = $row['ID']; Dedecms.com //处理一些特殊字段$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'] = "".ereg_replace("[<]","",$row['Title'])."'>";$row['imglink'] = "".$row['image'].""; 织梦好，好织梦 $row['fullTitle'] = $row['Title'];$row['Title'] = cn_substr($row['Title'],$Titlelen);if($row['color']!='') $row['Title'] = "".$row['Title']."";if(ereg('b',$row['flag'])) $row['Title'] = "".$row['Title']."";$row['textlink'] = "".$row['Title']."";$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()."rn";}//if hasRowelse{$artList .= '';}if($col>1) $artList .= "

{dede:likearticle col='2' row='10' Titlelen='42' eregtype=all|tag|keyword} [fIEld:Title/]2.把下边的PHP代码替换掉likearticle.lib里的代码  Dedecms.comcopyright Dedecms$getsql = " tag like '".join("' OR tag like '",$Tags)."' ";$dsql->Execute('me',"Select * From `dedecp_tagindex` where $getsql ");while($arow = $dsql->GetArray('me')) {$tIDs[] = $arow['ID'];}$tID = join(',',$tIDs);if($tID!=''){$dsql->Execute("me","Select aID From `dedecp_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 ";}$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.sitepathfrom `dedecp_archives` arc left join `dedecp_arctype` tp on arc.typeID=tp.IDwhere 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.sitepathfrom `dedecp_archives` arc left join `dedecp_arctype` tp on arc.typeID=tp.IDwhere 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.sitepathfrom `dedecp_archives` arc left join `dedecp_arctype` tp on arc.typeID=tp.IDwhere 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 = "rn";}$dtp2 = new DedeTagParse();$dtp2->SetnameSpace('fIEld','[',']');$dtp2->LoadString($innertext);$GLOBALS['autoindex'] = 0;$line = $row;for($i=0; $i < $line; $i++){if($col>1) $artList .= "rn";for($j=0; $j < $col; $j++){if($col>1) $artList .= "rn";}//Loop Colif($col>1) $i += $col - 1;if($col>1) $artList .= "rn"; }//loop lineif($col>1) $artList .= "rn";$dsql->FreeResult("al");return $artList;}?>