外部网站调用行业动态
作者:cmscn 日期:2005-04-22
<!-- #include file="include/skin.asp" -->
<%
dim id,topic
sql="select top 3 news.id,pic,topic,news.tim,news.counter,news.s_id,news.c_id,jk_sort.s_id,jk_sort.c_id,jk_sort.s_name from news,jk_sort where hidden=1 and jk_sort.s_id = news.s_id and jk_sort.c_id=news.c_id and news.c_id=90 order by id desc"
set rs=joekoe_cms.exec(sql,1)
do while not rs.eof
id=rs("id")
topic=rs("topic")
response.write vbcrlf&" document.write(""<table width='100%' border='0' cellspacing='0' cellpadding='0'><tr><td align='center'><a href='http://cdyis.com/vip/news_view.asp?id="&id&"' target=_blank ><img src='"&rs("pic")&"' width='100' height='100' style='border:1px solid #cccccc;' alt='文章标题:"&joekoe_cms.code_html(topic,1,0)&"'></a></td></tr><tr><td align='center'><a href='http://cdyis.com/vip/news_view.asp?id="&id&"' target=_blank alt='文章标题:"&joekoe_cms.code_html(topic,1,0)&"'>"&joekoe_cms.code_html(topic,1,17)&"</a></td></tr></table>"");"
rs.movenext
loop
rs.close
%>
定一文件名为newtu.asp
调用也加
<s cript src="http://cdyis.com/vip/newtu.asp"></s cript>
http://www.joekoe.com/forum_view.asp?forum_id=7&view_id=60962
评论: 8 | 引用: 0 | 查看次数: 555
发表评论