www.gusucode.com > cso中国seo优化html整站源码程序 > backlink.asp

    <!--#include file="include/config.asp"-->
<!--#include file="include/conn.asp"-->
<%
nid = request.querystring("nid")
response.ContentType = "text/html;charset=gb2312"
abs_url = "http://" & config_domain
	temp = "<a href="""&abs_url&"/"">快速减肥</a>"
sql = "select * from so_class order by orderid desc,id asc"
rs.open sql,conn,1,1
if not rs.eof then
do while not rs.eof
	temp = temp & ",<a href="""&abs_url&rs("url_html")&""">"&rs("title")&"</a>"
rs.movenext
loop
end if
rs.close

sql = "select * from so_article where id = "&nid
rs.open sql,conn,1,1
article = rs("content")
rs.close

mykeywords = split(temp,",")
for i = 0 to ubound(mykeywords)
	article = replace(article,"，",","&mykeywords(i),1,1)
next
response.write article
%>