其他文字广告首页调用代码

由于js文件里的代码是：
<!--
var ads_txt_dim=new Array(1);
var ads_txt_num=1;
ads_txt_dim[1]="广告|sssss||http://www.cm.bn";
-->
所以不能直接用下面代码调用
<script type="text/javascript" language=javascript src="style/data_ads_txt_other.js"></script>


由于是菜鸟只能想菜办法
用下面代码

Code:
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=cms2006.exec(sql,1)
do while not rs.eof
topic=rs("topic")
tmp1=tmp1&"<table cellspacing=1 cellpadding=0 align=center><tr><td><a href="&rs("url")&"
target=_blank>"&cms2006.code_html(topic,1,ads_cnum)&"</a></td></tr></table>"
rs.movenext
loop
rs.close
response.write tmp1
end sub



tmp1=tmp1&"<table cellspacing=1 cellpadding=0 align=center><tr><td with='50%'><a href="&rs("url")&"  
target=_blank>"&cms2006.code_html(topic,1,ads_cnum)&"</a></td></tr></table>"

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