indexnews.asp

来自「一个互联网络公司网站源码」· ASP 代码 · 共 19 行

<!--#include file="conn.asp" -->
document.write("<table width=\"100%\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">");
<%
	url="xwdt.htm"
	sql="select top 5 * from article where articleType='"&request.QueryString("newsType")&"' order by id desc"
	set rs=server.CreateObject("adodb.recordset")
	rs.open sql,conn,1,1
	while not rs.eof 
%>
document.write("  <tr>");
document.write("    <td height=\"25\" background=\"images/line2.gif\" style=\"padding-left:5px;\"><SPAN class=rightTime><img src=\"images/point1.gif\" width=\"6\" height=\"6\">　</SPAN><%=formatdatetime(rs("inserttime"),vbshortdate)%>　<a href=\"xwdt/xwdt.htm?id=<%=rs("id")%>\" title=\"<%=rs("title")%>\"><%=InterceptString(rs("title"),40)%></a></td>");
document.write("  </tr>");
<%
	rs.movenext
	wend
	rs.close
%>
document.write("</table>");