织梦获取上下页纯文本标签代码

标签：

前几天用 dedecms 做项目的时候，碰到了一个比较棘手的需求。就是在三级栏目的情况下，要获取它的上级栏目的名字和链接。一开始想着用sql标签来输出，但是因为栏目比较多，可能效率不是很好，于是就弄成了标签的形式。

代码实现如下：

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
<?php

if(!defined(‘DEDEINC‘)) exit(‘Request Error!‘);

function lib_type2(&$ctag,&$refObj)
{
global $dsql,$envs;

$attlist=‘typeid|0‘;
FillAttsDefault($ctag->CAttribute->Items,$attlist);
extract($ctag->CAttribute->Items, EXTR_SKIP);
$innertext = trim($ctag->GetInnerText());

if($typeid==0) {
$typeid = ( isset($refObj->TypeLink->TypeInfos[‘topid‘]) ? $refObj->TypeLink->TypeInfos[‘topid‘] : $envs[‘typeid‘] );
}

//if(empty($typeid)) return ‘‘;
if(empty($typeid)) $typeid=$refObj->TypeLink->TypeInfos[‘id‘];
//$row=null;
//if()
$row = $dsql->GetOne("Select topid,typedir,isdefault,defaultname,ispart,namerule2,typename,moresite,siteurl,sitepath
From `#@__arctype` where id=‘$typeid‘ ");
if(!is_array($row)) return ‘sdfsd‘;
if(trim($innertext)==‘‘) $innertext = GetSysTemplets("part_type_list.htm");

$dtp = new DedeTagParse();
$dtp->SetNameSpace(‘field‘,‘[‘,‘]‘);
$dtp->LoadSource($innertext);
if(!is_array($dtp->CTags))
{
unset($dtp);
return ‘‘;
}
else
{
$row[‘typelink‘] = GetTypeUrl($row[‘topid‘],MfTypedir($row[‘typedir‘]),$row[‘isdefault‘],
$row[‘defaultname‘],$row[‘ispart‘],$row[‘namerule2‘],$row[‘siteurl‘],$row[‘sitepath‘]);
foreach($dtp->CTags as $tagid=>$ctag)
{
if(isset($row[$ctag->GetName()])) $dtp->Assign($tagid,$row[$ctag->GetName()]);
}
$revalue = $dtp->GetResult();
unset($dtp);
return $revalue;
}
}
?>
把这个命名为type2.lib.php放在include/taglib目录下面，让后再模板里面调用：

1
2
3
{dede:type2}
<li><a href="[field:typelink/]">[field:typename/]</a></li>
{/dede:type2}
好记性不如烂笔头，还是记录在此，方便以后查询~

一生范文网http://www.onesheng.cn

织梦获取上下页纯文本标签代码

标签：

原文地址：http://www.cnblogs.com/phplover2014/p/4264362.html