论坛新贴可以外部网站调用的JS代码

<!-- #include file="include/skin.asp" -->
document.write(" <table width='100%' border=0 cellpadding='0' cellspacing='1'> ")

<%
dim id,topic
sql="select top 10 bbs_topic.id,bbs_topic.forum_id,bbs_topic.topic,bbs_topic.counter,bbs_topic.re_counter,bbs_topic.username,bbs_topic.tim,bbs_topic.icon,bbs_forum.forum_name from bbs_topic,bbs_forum where bbs_forum.forum_id=bbs_topic.forum_id and bbs_forum.forum_type<3 order by bbs_topic.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(""<tr class=bg_td><td height='"&dim_num(6)&"' style='border-bottom:1px dotted #e0e0e0'><a href='"&joekoe_cms.web_url&"forum_view.asp?forum_id="&rs("forum_id")&"&view_id="&id&"' alt='文章标题: "&joekoe_cms.code_html(topic,1,0)&" <br>人 气 值: "&rs("counter")&" <br>回 复 值: "&rs("re_counter")&" <br>发 布 人: "&rs("username")&" <br>发布时间: "&joekoe_cms.time_type(rs("tim"),0)&"'><img src='"&joekoe_cms.web_url&"images/icon/"&rs("icon")&".gif' border=0 align=absmiddle> "&joekoe_cms.code_html(topic,1,20)&"</a></td><td align=right class=tims style='border-bottom:1px dotted #e0e0e0' align=right>"&joekoe_cms.time_type(rs("tim"),4)&"</td></tr>"")"
rs.movenext
loop
rs.close
%>
JS调用代码
<s cript src="http://XYWLO.COM/forum_new.asp"></s cript>
<s cript >请自行把代码合并

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