sort.asp

来自「1. 在界面的开头显示新闻添加的位置」· ASP 代码 · 共 45 行

ASP
45
字号
<!--#include file="conn.asp"-->
<%
dim rs,classid,str1
classid=request.QueryString("classid")
set rs=server.CreateObject("ADODB.recordset")
str1="select * from article where classid="&classid
str1=str1+" order by date desc"
rs.open str1,conn
%>
<!--#include file="head.asp"-->
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="#0066CC">
  <tr>
    <td width="200"align="left" valign="top" scope="row"> 
      <table width="100%" height="100%" border="0">
        <tr><td align="left" valign="top" scope="row"><!--#include file="ip.asp"--></td></tr>
		<tr><td align="center" valign="top" scope="row"><!--#include file="hot.asp"--></td></tr>
		<tr><td align="center" valign="top" scope="row"><!--#include file="tuijian.asp"--></td></tr>
	   </table>
	 </td>
	 <td width="560"align="left" valign="top" scope="row"> 
	   <table>
     <%
	  while not rs.eof
	  %>
      <tr><td align="left" valign="top">
	 ◆<a href="sort1.asp?articleid=<%=rs("articleid")%>"> <font color="cccccc"><%=rs("title")%>(<%=rs("date")%>)</font></a>
	 <br><br>
		<%
	  rs.movenext
	  wend
	  %>  
	   </table>
	</td> 
    </tr>
 </table>
 
 <!--#include file="foot.asp"-->

</body>
</html>




⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?