sql标签嵌套调用实现循环显示栏目文章标签
一段时间没有给大家讲高级教程了,今天刚好商业区的管理员说有用户需要这方面的需求,问我如何实现!其实也不难.我就给大家做个教程吧!
用过科汛系统函数标签的"循环显示栏目文章标签"的用户可能就知道这个标签有一定的局限性,样式无法自己控制.往往无法满足自己的需求.现在我就教大家用sql标签来实现类似效果的制作方法
正如标题所说需要sql标签嵌套调用,但考虑到系统生成速度方面原因,默认情况下科汛的sql标签是不支持嵌套调用的,那我们就对科汛的代码进行小手术.请跟我来吧
第一步:对代码进行小手术
用dw等编辑工具打开KS_Cls/Kesion.Label.CommonCls.asp文件,并找到约112左右的如下代码
Dim DCls:Set Dcls=New DIYCls
Content=DCls.ReplaceUserFunctionLabel(Content)
Set DCls=nothing
ReplaceAllLabel =Content
ReplaceAllLabel=DCls.ReplaceUserFunctionLabel(Content)
我们改成以下代码
Dim DCls:Set Dcls=New DIYCls
Content=DCls.ReplaceUserFunctionLabel(Content)
相信有点asp代码基础的用户都可以看得明白,就是当模板文件里包括{SQL_开头时,就再一次执行sql标签替换操作.正如之前说的,考虑到生成速度方面原因.如果模板里不包含{SQL_就不再替换了,所以这里的If判断对系统的性能有一定的作用.因为我们并不要求所有标签都要嵌套的.
第二步:分析实现
制作被嵌套的文章列表(查询KS_Article表):
sql标签名称:文章循环体
sql参数: 栏目ID
sql语句:select top 10 id,title,adddate from ks_article where tid='{$Param(0)}' order by id desc
sql循环体:
[loop=10]
<li><a href="{$Field(id,GetInfoUrl,1,1)}" target="_blank">{$Field(title,Text,0,...,0,)}</a></li>
[/loop]
制作栏目列表标签(查询KS_Class栏目表)
sql标签名称:循环栏目列表
sql语句:select top 10 id,FolderName from ks_class where tn='{$CurrClassID}' order by folderOrder
sql循环体:
<table border="0" width="100%">
[loop=10]
<tr>
<td>{$Field(foldername,Text,0,...,0,)}</td>
</tr>
<tr>
<td sytle="border:1px solid #cccccc">
{SQL_文章循环体({$Field(id,GetInfoUrl,100,2)})}
</td>
</tr>
[/loop]
</table>
tips:上面红色就是插入上面制作的文章列表标签,参数{$Field(id,GetInfoUrl,100,2)}表示生成栏目ID号
第三步:模板调用
{SQL_循环栏目列表()}