其他文字广告在其它页面的调用

sub ads_txt(ads_tnum,ads_cnum)
dim tmp1,topic,url
sql="select top "&ads_tnum&" id,topic,url from ads_txt where nsort='other' order by id desc"
set rs=joekoe_cms.exec(sql,1)
do while not rs.eof
topic=rs("topic")
tmp1=tmp1&"<table cellspacing=1 cellpadding=1><tr><td><a href="&rs("url")&" target=_blank>"&joekoe_cms.code_html(topic,1,ads_cnum)&"</a></td></tr></table>"
rs.movenext
loop
rs.close
response.write tmp1
end sub

调用 call ads_txt(5,28)
红色为调用条数,蓝色为标题字数

文章来自: 本站原创
引用通告: 查看所有引用 | 我要引用此文章
Tags:
相关日志: