nword_js.asp

来自「shopxp网上购物系统v6.6已经调试,百分百可用」· ASP 代码 · 共 15 行

<!--#include file="../nUser/config.asp"-->
<!--#include file="../nUser/conn.asp"-->

document.write('<a  href="http://cnc.qinzd.com/nUser/nWord_Add.asp" ><span class="red">↓↓↓文字广告￥100.00/月</span></a>')
<%
sql= "select * from kheu_nWord order by id"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1 
n=2
do while not rs.eof
%>
document.write('<a target="_blank" href="<%=rs("url")%>"><%=rs("title")%></a>')
<%rs.movenext 
n=n+1
loop%>