一、模版页面：

标签名称：{$MY_网站友情链接}

参数：输出数量

查询语句

select top {input(0)} SiteName,SiteUrl from PE_FriendSite where Passed=true order by UpdateTime asc

标签内容

{Loop}{Infobegin}
<div style="float:left;text-align:left;margin-right:15px;white-space:nowrap;"><a href="{$Field(1,Text,0,0,0)}" title="{$Field(0,Text,0,0,0)}" target="_blank">{$Field(0,Text,0,0,0)}</a></div>
{Infoend}{/Loop}

调用示例：{$MY_读取子栏目列表(30)}

二、asp页面：

<%
'查询友情链接
dim FriendSiteSql,FriendSiteRS
set FriendSiteRS=server.CreateObject("adodb.recordset")
FriendSiteSql="select top 30 SiteName,SiteUrl from PE_FriendSite where Passed=true order by UpdateTime asc"
FriendSiteRS.open FriendSiteSql,conn,3,2
do while not FriendSiteRS.eof
%>
<div style="float:left;text-align:left;margin-right:15px;white-space:nowrap;"><a href="<%=FriendSiteRS("SiteUrl")%>" title="<%=FriendSiteRS("SiteName")%>" target="_blank"><%=FriendSiteRS("SiteName")%></a></div>
<%
FriendSiteRS.movenext
loop
FriendSiteRS.close
set FriendSiteRS=nothing
%>