给织梦的dede:channel增加可选择范围的属性

需要调用一些指定ID几到几的一些栏目。刚开始打算直接将链接写死在模版里。后来觉得这样对程序的扩展性不是很好。客户是不懂程序的，你不能指望他也会修改模版。于是就有了做这样一个小功能的想法。 在原来的dede:channel基础上增加了一个limit属性。 limit是起点，row是条数

使用方法：

{dede:channel type='son' limit='3' typeid='1' reid='1' row='5' "<a href='~typelink~' class='thisclass'>~typename~</a> |"} <a href="[field:typelink/]"><span class="aaa">[field:typename/]</span></a> {/dede:channel}

将一下的代码复制到include/taglib/channel.lib.php中进行覆盖：

function lib_channel(&$ctag,&$refObj)
{
	global $dsql;
 
	$attlist = "typeid|0,reid|0,row|100,col|1,type|son,currentstyle|,cacheid|,limit|0";
	FillAttsDefault($ctag->CAttribute->Items,$attlist);
	extract($ctag->CAttribute->Items, EXTR_SKIP);
	$innertext = $ctag->GetInnerText();
	$line = empty($row) ? 100 : $row;
 
	$likeType = '';
	//读取固定的缓存块
	$cacheid = trim($cacheid);
	if($cacheid !='') {
		$likeType = GetCacheBlock($cacheid);
		if($likeType != '') return $likeType;
	}
 
	$reid = 0;
	$topid = 0;
	//如果属性里没指定栏目id，从引用类里获取栏目信息
	if(empty($typeid))
	{
		if( isset($refObj->TypeLink->TypeInfos['id']) )
		{
			$typeid = $refObj->TypeLink->TypeInfos['id'];
			$reid = $refObj->TypeLink->TypeInfos['reid'];
			$topid = $refObj->TypeLink->TypeInfos['topid'];
		}
		else {
	  	$typeid = 0;
	  }
	}
	//如果指定了栏目id，从数据库获取栏目信息
	else
	{
		$row2 = $dsql->GetOne("Select * From `#@__arctype` where id='$typeid' ");
		$typeid = $row2['id'];
		$reid = $row2['reid'];
		$topid = $row2['topid'];
		$issetInfos = true;
	}
 
	if($type=='' || $type=='sun') $type='son';
	if($innertext=='') $innertext = GetSysTemplets("channel_list.htm");
 
	if($type=='top')
	{
		$sql = "Select id,typename,typedir,isdefault,ispart,defaultname,namerule2,moresite,siteurl,sitepath
		  From `#@__arctype` where reid=0 And ishidden<>1 order by sortrank asc limit $limit, $line ";
	}
	else if($type=='son')
	{
		if($typeid==0) return '';
		$sql = "Select id,typename,typedir,isdefault,ispart,defaultname,namerule2,moresite,siteurl,sitepath
		  From `#@__arctype` where reid='$typeid' And ishidden<>1 order by sortrank asc limit $limit, $line ";
	}
	else if($type=='self')
	{
		if($reid==0) return '';
		$sql = "Select id,typename,typedir,isdefault,ispart,defaultname,namerule2,moresite,siteurl,sitepath
			From `#@__arctype` where reid='$reid' And ishidden<>1 order by sortrank asc limit $limit, $line ";
	}
	//And id<>'$typeid'
	$needRel = false;
	$dtp2 = new DedeTagParse();
	$dtp2->SetNameSpace('field','[',']');
	$dtp2->LoadSource($innertext);
	//检查是否有子栏目，并返回rel提示（用于二级菜单）
	if(ereg(':rel', $innertext)) $needRel = true;
 
	if(empty($sql)) return '';
	$dsql->SetQuery($sql);
	$dsql->Execute();
 
	$totalRow = $dsql->GetTotalRow();
	//如果用子栏目模式，当没有子栏目时显示同级栏目
	if($type=='son' && $reid!=0 && $totalRow==0)
	{
		$sql = "Select id,typename,typedir,isdefault,ispart,defaultname,namerule2,moresite,siteurl,sitepath
			From `#@__arctype` where reid='$reid' And ishidden<>1 order by sortrank asc limit $limit, $line ";
		$dsql->SetQuery($sql);
	  $dsql->Execute();
	}
	$GLOBALS['autoindex'] = 0;
	for($i=0;$i < $line;$i++)
	{
		if($col>1) $likeType .= "<dl>\r\n";
		for($j=0; $j<$col; $j++)
		{
			if($col>1) $likeType .= "<dd>\r\n";
			if($row=$dsql->GetArray())
			{
				$row['sonids'] = $row['rel'] = '';
				if($needRel)
				{
					$row['sonids'] = GetSonIds($row['id'], 0, false);
					if($row['sonids']=='') $row['rel'] = '';
					else $row['rel'] = " rel='dropmenu{$row['id']}'";
				}
				//处理同级栏目中，当前栏目的样式
				if( ($row['id']==$typeid || ($topid==$row['id'] && $type=='top') ) && $currentstyle!='' )
				{
					$linkOkstr = $currentstyle;
					$row['typelink'] = GetOneTypeUrlA($row);
					$linkOkstr = str_replace("~rel~",$row['rel'],$linkOkstr);
					$linkOkstr = str_replace("~id~",$row['id'],$linkOkstr);
					$linkOkstr = str_replace("~typelink~",$row['typelink'],$linkOkstr);
					$linkOkstr = str_replace("~typename~",$row['typename'],$linkOkstr);
					$likeType .= $linkOkstr;
				}
				else
				{
					$row['typelink'] = $row['typeurl'] = GetOneTypeUrlA($row);
					if(is_array($dtp2->CTags))
					{
						foreach($dtp2->CTags as $tagid=>$ctag)
						{
							if(isset($row[$ctag->GetName()])) $dtp2->Assign($tagid,$row[$ctag->GetName()]);
						}
					}
					$likeType .= $dtp2->GetResult();
				}
			}
			if($col>1) $likeType .= "</dd>\r\n";
			$GLOBALS['autoindex']++;
		}
		//Loop Col
		if($col>1)
		{
			$i += $col - 1;
			$likeType .= "	</dl>\r\n";
		}
	}
	//Loop for $i
	$dsql->FreeResult();
	if($cacheid !='') {
		WriteCacheBlock($cacheid, $likeType);
	}
	return $likeType;
}