📄 affiche.asp

📁 直接解压即可都是asp源码超经典的啊

💻 ASP

字号:

<!--#include file="conn.asp"-->
<!--#include file="top.asp"-->
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="style.css" rel="stylesheet" type="text/css">

<body leftmargin="0" topmargin="0">

      <div align="center">
        <center>
      <TABLE border=1 cellPadding=0 cellSpacing=0 width="760" bordercolor="#6687BA" style="border-collapse: collapse">
        <TBODY>
          <TR> 
            <TD vAlign=top width=174 height="204"><!--#include file="service_left.asp"--> 
            </TD>
            
          <TD align=middle vAlign=top nowrap height="204"> 
            
              <%
					  Set rs = Server.CreateObject("ADODB.Recordset")
sql="select  top 10 * from affiche order by id desc"
rs.open sql,conn,3,3
if rs.eof then 
response.Write("")
else
%>
<TABLE 
            width=100% border=0 align="center" cellPadding=3 cellSpacing=0>
                <TR> 
                  
                <TD nowrap> <BR>
                   <% do while not rs.eof %> 
				<div align="center">
					<TABLE width="95%" border=0 cellSpacing=0>
                      <TR> 
                        <TD vAlign=top width=12>&gt;&gt;</TD>
                        <TD><a href="showaffiche.asp?id=<%=rs("id")%>">&nbsp;<%=rs("affichetop")%></a></TD>
                      </TR>
                      <TR> 
                        <TD height="1" colspan="2" vAlign=top background="images/hx.gif"></TD>
                      </TR>
                    </TABLE>
                    </div>
                    <br> <% rs.movenext
					        loop
							%></TD>
                  <TD width="176"><img src="images/corp1.gif" width="176" height="162"></TD>
                </TR>
              </TABLE>
			  <% end if%>
              </TD>
          </TR>
        </TBODY>
      </TABLE>
        </center>
</div><!--#include file="foot.asp"-->
      </body>

<% rs.close
set rs=nothing
set conn=nothing
%>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -