index.asp
来自「用asp写的关于亚运会的网页」· ASP 代码 · 共 225 行
ASP
225 行
<html><!-- InstanceBegin template="/Templates/moban.dwt.asp" codeOutsideHTMLIsLocked="false" -->
<head>
<title>多哈亚运会</title>
<style type="text/css">
<!--
body {
margin-top: 0px;
background-color: #FF6921;
}
.STYLE1 {font-size: 12px}
.STYLE4 {color: #00FFFF}
.STYLE5 {font-size: 12px; color: #00FFFF; }
-->
</style></head>
<body>
<table width="750" border="0" align="center">
<tr>
<td><div align="center"><img src="../image/sq061121002.jpg" width="750" height="115"></div></td>
</tr>
</table>
<table width="750" border="0" align="center">
<tr>
<td width="102"><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0" width="100" height="22">
<param name="BGCOLOR" value="">
<param name="movie" value="../Templates/button1.swf">
<param name="quality" value="high">
<embed src="../Templates/button1.swf" quality="high" pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" width="100" height="22" ></embed>
</object></td>
<td width="102"><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0" width="100" height="22">
<param name="BGCOLOR" value="">
<param name="movie" value="../Templates/button2.swf">
<param name="quality" value="high">
<embed src="../Templates/button2.swf" quality="high" pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" width="100" height="22" ></embed>
</object></td>
<td width="102"><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0" width="100" height="22">
<param name="BGCOLOR" value="">
<param name="movie" value="../Templates/button3.swf">
<param name="quality" value="high">
<embed src="../Templates/button3.swf" quality="high" pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" width="100" height="22" ></embed>
</object></td>
<td width="102"><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0" width="100" height="22">
<param name="BGCOLOR" value="">
<param name="movie" value="../Templates/button4.swf">
<param name="quality" value="high">
<embed src="../Templates/button4.swf" quality="high" pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" width="100" height="22" ></embed>
</object></td>
<td width="102"><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0" width="100" height="22">
<param name="BGCOLOR" value="">
<param name="movie" value="../Templates/button5.swf">
<param name="quality" value="high">
<embed src="../Templates/button5.swf" quality="high" pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" width="100" height="22" ></embed>
</object></td>
<td width="105"><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0" width="100" height="22" align="absmiddle">
<param name="BGCOLOR" value="">
<param name="movie" value="../Templates/button6.swf">
<param name="quality" value="high">
<embed src="../Templates/button6.swf" width="100" height="22" align="absmiddle" quality="high" pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" ></embed>
</object></td>
<td width="105"><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=5,0,0,0" width="100" height="22" align="middle">
<param name="BGCOLOR" value="">
<param name="movie" value="../Templates/button7.swf">
<param name="quality" value="high">
<embed src="../Templates/button7.swf" width="100" height="22" align="middle" quality="high" pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" ></embed>
</object></td>
</tr>
</table>
<table width="755" border="0" align="center" bgcolor="#FFB673">
<tr>
<td width="600" align="left" valign="top"><!-- InstanceBeginEditable name="EditRegion1" -->
<%
dim cn1,rs1,sql1,i,j,rowcount,cpage
set cn1 = server.CreateObject("ADODB.Connection")
set rs1 = server.CreateObject("ADODB.Recordset")
cn1.ConnectionString="dsn=asp"
cn1.Open
rs1.CursorType=1
rs1.pagesize=3
sql1="select * from table_liuyan ORDER BY Add_date DESC"
rs1.Open sql1,cn1
if rs1.pagecount=0 then
%>
<table width="590" border="0" align="center">
<tr>
<td width="651" align="center" valign="middle"><font size="6" face="隶书"> 留言板<br>
</font><font size="6"><span class="STYLE1">(共<%=rs1.recordcount%>条记录)</span></font>
<div align="center">
<table width="50%" border="0" align="center">
<tr valign="middle" align="center">
<td width="50%"><a href="fill.asp" class="STYLE1">我要留言</a></td>
<td width="49%"><p><a href="login.asp" class="STYLE1">留言板管理</a></p></td>
</tr>
</table>
</div></td></tr></table>
<%
else
cpage=cint(request("op"))
if cpage="" or cpage=0 then
cpage=1
end if
if cpage>=rs1.pagecount+1 then
cpage=rs1.pagecount
end if
rs1.absolutepage=cpage
i=cpage+1
j=cpage-1
rowcount=0
%>
<table width="590" border="0" align="center">
<tr>
<td width="651" align="center" valign="middle"><font size="6" face="隶书"> 留言板<br>
</font><font size="6"><span class="STYLE1">(共<%=rs1.recordcount%>条记录)</span></font>
<div align="center">
<table width="50%" border="0" align="center">
<tr valign="middle" align="center">
<td width="50%"><a href="fill.asp" class="STYLE1">我要留言</a></td>
<td width="49%"><p><a href="login.asp" class="STYLE1">留言板管理</a></p></td>
</tr>
</table>
<br>
<%
while not rs1.EOF and rowcount<rs1.pagesize
%>
<table width="100%" border="0" align="center">
<tr>
<td colspan="3" bgcolor="#0099cc" class="STYLE1"><font color="#FFFFFF">◆<%=(rs1.Fields.Item("Title").Value)%></font></td>
</tr>
<tr>
<td width="15%" height="78" rowspan="4" align="center" valign="top"><p><img src="images/face/<%=(rs1.Fields.Item("Facefile").Value)%>.gif"><br>
<span class="STYLE1"><%=(rs1.Fields.Item("Name").Value)%></span></p>
<td height="95" colspan="2" align="left" valign="top" class="STYLE1"><%=(rs1.Fields.Item("Content").Value)%></td>
</tr>
<tr>
<td colspan="2" class="STYLE1">留言时间：<%=(rs1.Fields.Item("Add_date").Value)%></td>
</tr>
<% If (rs1.Fields.Item("Reply_date").Value) <> ("") Then %>
<tr>
<td width="11%" valign="top" class="STYLE1">留言回复：</td>
<td width="74%" class="STYLE1"><%=(rs1.Fields.Item("Reply").Value)%></td>
</tr>
<tr>
<td colspan="2" class="STYLE1">回复时间：<%=(rs1.Fields.Item("Reply_date").Value)%></td>
</tr>
<% end if %>
</table>
<%
rowcount=rowcount+1
rs1.MoveNext
wend
%>
</div>
</table>
<p align="center" class="STYLE1">当前记录:第<%=cpage%>页
<a href="index.asp?op=1">第一页</a>
<a href="index.asp?op=<%=i%>">上一页</a>
<a href="index.asp?op=<%=j%>">下一页</a>
<a href="index.asp?op=<%=rs1.pagecount%>">最后一页</a> 共<%=rs1.pagecount%>页
<% end if%>
<!-- InstanceEndEditable --></td>
<td width="155" align="right" valign="top"><table width="146" align="center" bgcolor="#FF9966">
<Form name="Form1" METHOE="post" action="../Templates/yundongyuan.asp?txtxm= <% =request.form("txtxm")%>&&txtname=<%=request.form("txtname")%>">
<tr>
<td align="center" valign="top"><p><span class="STYLE1">项目:</span>
<input type="text" name="txtxm" size="10">
</p></td>
</tr>
<tr>
<td align="center" valign="top"><p><span class="STYLE1">姓名:</span>
<input type="text" name="txtname" size="10">
</p></td>
</tr>
<tr>
<td align="center" valign="top"><p>
<input type="submit" name="btnOK" value="搜索">
</p></td>
</tr>
</Form>
<tr>
<td height="227" align="center" valign="top"><table width="146" border="0" bgcolor="#FF9900">
<tr>
<td><div align="center"><a href="../before/1.asp"><img src="../image/１.jpg" alt="第一届" width="60" height="60" border="0"></a></div></td>
<td><div align="center"><a href="../before/2.asp"><img src="../image/２.jpg" alt="第二届" width="60" height="60" border="0"></a></div></td>
</tr>
<tr>
<td><div align="center"><a href="../before/3.asp"><img src="../image/３.jpg" alt="第三届" width="60" height="60" border="0"></a></div></td>
<td><div align="center"><a href="../before/4.asp"><img src="../image/４.jpg" alt="第四届" width="60" height="60" border="0"></a></div></td>
</tr>
<tr>
<td><div align="center"><a href="../before/5.asp"><img src="../image/５.jpg" alt="第五届" width="60" height="60" border="0"></a></div></td>
<td><div align="center"><a href="../before/6.asp"><img src="../image/６.jpg" alt="第六届" width="60" height="60" border="0"></a></div></td>
</tr>
<tr>
<td><div align="center"><a href="../before/7.asp"><img src="../image/７.jpg" alt="第七届" width="60" height="60" border="0"></a></div></td>
<td><div align="center"><a href="../before/8.asp"><img src="../image/８.jpg" alt="第八届" width="60" height="60" border="0"></a></div></td>
</tr>
<tr>
<td><div align="center"><a href="../before/9.asp"><img src="../image/９.jpg" alt="第九届" width="60" height="60" border="0"></a></div></td>
<td><div align="center"><a href="../before/10.asp"><img src="../image/１０.jpg" alt="第十届" width="60" height="60" border="0"></a></div></td>
</tr>
<tr>
<td><div align="center"><a href="../before/11.asp"><img src="../image/１１.jpg" alt="第11届" width="60" height="60" border="0"></a></div></td>
<td><div align="center"><a href="../before/12.asp"><img src="../image/１２.jpg" alt="第12届" width="60" height="60" border="0"></a></div></td>
</tr>
<tr>
<td><div align="center"><a href="../before/13.asp"><img src="../image/１３.jpg" alt="第13届" width="60" height="60" border="0"></a></div></td>
<td><div align="center"><a href="../before/14.asp"><img src="../image/１４.jpg" alt="第14届" width="60" height="60" border="0"></a></div></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table>
<hr width="750">
<table align="center">
<tr>
<td height="70" align="center" class="text02"> <span class="STYLE1">Copyright 1987 - 2006
All Rights Reserved <br>
版权所有</span> </td>
</tr>
</table>
</body>
<!-- InstanceEnd --></html>
<%
rs1.Close()
%>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?