dede扩展标签及自定义标签

　　这里我们知道，其实标签生成的内容其实是这个函数的一个返回值，这里返回的内容都是字符串，也就是函数return $revalue;中的$revalue需要是经过处理后生成的字符串。
　　$attlist="row|12,titlelen|24";这个是属性列表，这个经过函数处理后会直接生成变量并复制，我们可以测试下，做如下的修改：
　　$revalue = 'Hello Word!';
　　$revalue .="
Row:".$row.";TitleLen:".$titlelen;

　　这样我们可以看到，这个属性已经被创建变量并且赋值了。
　　接下来我们可以再进一步去修改这个标签。
　　比如说我们需要写一个标签专门来查询文章内容页的那个相关文章，功能类似于上面sql标签中的那个sql，只是这里我们将其分装为一个标签。
　　我们可以新建一个标签，例如叫writerarc，那我们就需要创建一个writerarc.lib.php，然后模仿demotag编写函数，注意需要修改为
　　function lib_writerarc(&$ctag,&$refObj)
　　接下来我们就可以编写查询语句及对底层模板处理的相关函数了
　　$revalue = '';
　　$innertext = $ctag->GetInnerText();
　　$ctp = new DedeTagParse();
　　$ctp->SetNameSpace('field', '[', ']');
　　$sql = "SELECT * FROM dede_archives WHERE writer='{$refObj->Fields['writer']}' limit 0, $row";
　　$innertext这个是用来获取标签的底层模板的，$ctp创建用于处理底层模板中的变量，并处理进行替换。我们根据获取的属性编写我们的sql语句，这里我们使用limit 0, $row，这样就可以根据$row来确定查询的内容数目。
　　当然我们可以获取更多的属性以便我们这个标签更强大，例如我们可以增加类似于arclist中的相关属性，并在函数中进行处理，不过这个需要有一定的PHP基础。
　　接下来我们通过执行查询对sql及输出变量进行处理：
　　$dsql->Execute('me',$sql);
　　while($rs = $dsql->GetArray('me'))
　　{
　　//根据属性处理查询变量
　　$rs['title'] = cn_substr($rs['title'], $titlelen);
　　//获取底层模板
　　$ctp->LoadSource($innertext);
　　foreach($ctp->CTags as $tagid=>$ctag) {
　　if(!empty($rs[strtolower($ctag->GetName())])) {
　　$ctp->Assign($tagid,$rs[$ctag->GetName()]);
　　}
　　}
　　//根据底层模板及查询变量得到处理结果
　　$revalue .= $ctp->GetResult();
　　}
　　这样我们就将查询出来的结果同底层模板中出现的相关变量进行替换，然后生成输出字符串，将所有的字符串信息存储到$revalue中。
　　最后返回这个值return $revalue;
　　整个文件内容如下：
　　
　　if(!defined('DEDEINC'))
　　{
　　exit("Request Error!");
　　}
　　function lib_writerarc(&$ctag,&$refObj)
　　{
　　global $dsql,$envs;
　　//属性处理
　　$attlist="row|12,titlelen|24";
　　FillAttsDefault($ctag->CAttribute->Items,$attlist);
　　extract($ctag->CAttribute->Items, EXTR_SKIP);
　　$revalue = '';
　　$innertext = $ctag->GetInnerText();
　　$ctp = new DedeTagParse();
　　$ctp->SetNameSpace('field', '[', ']');
　　$sql = "SELECT * FROM dede_archives WHERE writer='{$refObj->Fields['writer']}' limit 0, $row";
　　$dsql->Execute('me',$sql);
　　while($rs = $dsql->GetArray('me'))
　　{
　　//根据属性处理查询变量
　　$rs['title'] = cn_substr($rs['title'], $titlelen);
　　//获取底层模板
　　$ctp->LoadSource($innertext);
　　foreach($ctp->CTags as $tagid=>$ctag) {
　　if(!empty($rs[strtolower($ctag->GetName())])) {
　　$ctp->Assign($tagid,$rs[$ctag->GetName()]);
　　}
　　}
　　//根据底层模板及查询变量得到处理结果
　　$revalue .= $ctp->GetResult();
　　}
　　return $revalue;
　　}
　　?>
　　接下来我们来测试我们这个标签，我们修改article_article.htm模板，在里面加入以下的标签代码：
　　{dede:writerarc row='10' titlelen='6'}
　　[field:title/]

　　{/dede:writerarc}