⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 adpru.asp

📁 中国山药网源码 演示地址:http://www.shanyaowang.com/business 后台地址:admin/admin.asp 密码:369369 密码修改地址:admin/adse
💻 ASP
字号:
<%if session("loc")=0 then response.redirect "admin.asp"%>
<html>
<head>
<meta http-equiv="Content-Language" content="en-us">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>xinhs</title>
<style>
<!--
td           { font-size: 9pt }
     A:link {text-decoration: none; color:#000000}
     A:visited {text-decoration: none; color: #000000}
     A:active {text-decoration: none; color: #FF0000}
     A:hover {text-decoration: underline; color: FF0000}
-->
</style>
</head>

<body topmargin="10" leftmargin="0" bgcolor="#FFFFE6">

<div align="center">
  <center>
  <table border="0" width="760" cellspacing="1" cellpadding="0">
    <tr>
      <td width="750" valign="middle"></td>
    </tr>
    <tr>
      <td width="754" bgcolor="#000000" height="1"></td>
    </tr>
    <tr>
      <td bgcolor="#FFCC99" align="center">xinhs网站管理系统</td>  
    </tr>  
    <tr>  
      <td width="754" bgcolor="#000000" height="1"></td>  
    </tr>  
  </center>  
    <tr>  
      <td width="754" height="5">
        <p align="right"></td>  
    </tr>  
  </table>  
</div>  
  
<div align="center">  
  <table border="0" width="760" cellspacing="0" cellpadding="0" height="65%">  
    <tr>             
      <td width="359" valign="top" align="center">
      <p align="left">====网站公告管理=<br>
      <br>
  <center>  
<table border="0" cellspacing="3" cellpadding="0">
      <%set com=server.createobject("adodb.connection")
com.open "DBQ="& Server.MapPath("../xinhs.mdb")  &";Driver={Microsoft Access Driver (*.mdb)}"
set rs=com.execute("select*from news")
do while not rs.eof%>
                <tr>
                  <td><%response.write rs(1)%></td><td width="46" align="center"> <a href="adprud.asp?n=<%response.write rs(0)%>">删</a></td>
                </tr>
<%rs.movenext
loop%>
</table>
      </center>
</td>             
      <td width="392" valign="top">
      <p align="center"> </p>
      <p align="center">添加新公告</p>
      <form method="POST" action="adprua.asp">
        <p align="center">主题:<input type="text" name="t1" size="27"></p>
        <p align="center">内容:<textarea rows="5" name="t2" cols="25"></textarea></p>
        <p align="center"><input type="submit" value=" 添  加 " name="B1" style="font-size: 9pt; background-color: #FFFFE6; border-style: solid"> 
        <input type="reset" value=" 重  写 " name="B2" style="font-size: 9pt; background-color: #FFFFE6; border-style: solid"></p> 
      </form> 
      <p align="center"> 
        
      <p align="center"><a href="adsel.asp"><font color="#0000FF">&lt;&lt;&lt;&lt;&lt;返回</font></a>
      <p align="center"> 
    </td>              
    </tr>              
  </table>              
</div>              
              
<div align="center">              
  <center>              
  <table border="0" width="760" cellspacing="1" cellpadding="0">              
    <tr>                  
      <td height="21" align="center"><%rs.close
      com.close%>Copy right by xinhs.com &copy; 1999 - 2000</td>                       
    </tr>                       
  </table>                       
  </center>                       
</div>                       
                       
</body>                       
                       
</html>                       

⌨️ 快捷键说明

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