织梦实现全站按TAG和关键字调用相关文章教程
2022-12-05
307
2.把下边的php代码替换掉include/taglib/likearticle.lib里的代码
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 "; 调用整站相关文章 $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.lol9.cn 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 = "