admin.asp

来自「用asp写的关于亚运会的网页」· ASP 代码 · 共 224 行

ASP
224 行
字号 
<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" -->
<%if session("yhm")="" then
	response.Redirect "error.asp"
end if
set cn1=server.createobject("adodb.connection")
set rsadmin = Server.CreateObject("ADODB.Recordset")
cn1.connectionstring="dsn=asp"
cn1.open
rsadmin.CursorType=1
rsadmin.pagesize=3
sql = "SELECT * FROM table_liuyan ORDER BY Reply_date DESC"
rsadmin.Open sql,cn1
if rsadmin.pagecount=0 then
%>
<table width="590" border="0" align="center">
  <tr>
    <td width="760">      <div align="center"> 
      <h3><br>
        留言板管理<br>
        <span class="STYLE1">(共<%=rsadmin.recordcount%>条记录)</span>
      </h3>
    </div></td></tr></table>
	 <p align="center"><a href="index.asp" class="STYLE1">退出管理</a></p>
<%else
cpage=cint(request("op"))
  if cpage="" or cpage=0 then
  cpage=1
  end if
  if cpage>=rsadmin.pagecount+1 then
  cpage=rsadmin.pagecount
  end if
rsadmin.absolutepage=cpage
i=cpage+1
j=cpage-1
rowcount=0
%>
<table width="590" border="0" align="center">
  <tr>
    <td width="760">      <div align="center"> 
      <h3><br>
        留言板管理<br>
        <span class="STYLE1">(共<%=rsadmin.recordcount%>条记录)</span>
      </h3>
      <table width="552" border="0">
        <%
  while not rsadmin.EOF and rowcount<rsadmin.pagesize
  	%>
        <tr bgcolor="#0099cc"> 
          <td width="29%"><span class="STYLE1"><font color="#FFFFFF">留言人：</font></span><font color="#FFFFFF" class="STYLE1"><%=(rsadmin.Fields.Item("Name").Value)%></font></td>
          <td colspan="3"><font color="#FFFFFF" class="STYLE1">标题：<%=(rsadmin.Fields.Item("Title").Value)%></font></td>
        </tr>
        <tr> 
          <td width="29%" class="STYLE1">留言时间：</td>
          <td width="8%" rowspan="2" align="left" valign="top" class="STYLE1">内容：</td>
          <td colspan="2" rowspan="2" align="left" valign="top" class="STYLE1"><%=(rsadmin.Fields.Item("Content").Value)%></td>
        </tr>
        <tr> 
          <td width="29%" valign="top" class="STYLE1"><%=(rsadmin.Fields.Item("Add_date").Value)%></td>
        </tr>
        <tr> 
          <td width="29%" class="STYLE1">回复时间：</td>
          <td rowspan="2" valign="top"> 
            <p class="STYLE1"><font color="#000000">内容：</font></p>        </td>
          <td colspan="2" rowspan="2" valign="top"><span class="STYLE1"><font color="#000000"><%=(rsadmin.Fields.Item("Reply").Value)%></font></span></td>
        </tr>
        <tr> 
          <td width="29%" valign="top" class="STYLE1"><%=(rsadmin.Fields.Item("Reply_date").Value)%></td>
        </tr>
        <tr> 
          <td width="29%" height="2">&nbsp;</td>
          <td height="2" colspan="2" align="right"><a href="reply.asp?id=<% = (rsadmin.Fields.Item("ID").Value) %>" class="STYLE1">回复留言</a></td>
          <td width="11%" align="right"><a href="delete.asp?id=<% = (rsadmin.Fields.Item("ID").Value) %>" class="STYLE1">删除留言</a></td>
        </tr>
        <%
		rowcount=rowcount+1 
	rsadmin.MoveNext
	wend
	%>
        </table>
  <p align="center" class="STYLE1">当前记录:第<%=cpage%>页 　
<a href="admin.asp?op=1">第一页</a>　　
<a href="admin.asp?op=<%=i%>">上一页</a> 　　
<a href="admin.asp?op=<%=j%>">下一页</a>　　　
<a href="admin.asp?op=<%=rsadmin.pagecount%>">最后一页</a>　　　共<%=rsadmin.pagecount%>页
  <%
rsadmin.Close()
%>
    <p><a href="index.asp" class="STYLE1">退出管理</a></p>
    </div></td>
  </tr>
	</table>
	<% 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>

admin.asp - 源码说明

本页面展示了「用asp写的关于亚运会的网页」中的 admin.asp 源码文件，采用 ASP 编程语言编写，共 224 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与asp相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

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