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

📄 list.asp

📁 此程序是对音像店的管理系统,测试播放音象等功能
💻 ASP
字号:
<!--#include file="conn.asp"-->
<!--#include file="session.asp"-->
<script language= "javascript">
function openpage(htmlurl) {
var newwin=window.open(htmlurl,"newWin","toolbar=no,location=no,directories=no,status=no,scrollbars=yes,menubar=no,resizable=no,top=100,left=200,width=600,height=500");
newwin.focus();
return false;
}
</script>

<style type="text/css">
<!--
td {  font-family: "Arial", "Helvetica", "sans-serif"; font-size: 12px; font-style: normal; line-height: 20px; font-weight: normal; font-variant: normal}

a:link {
	font-family: Arial, Helvetica, sans-serif;
	color: #336699;
	
}
a:visited {
	font-family: Arial, Helvetica, sans-serif;
	color: #336699;
	
}
a:hover {
	font-family: Arial, Helvetica, sans-serif;
	color: #FF6600;
	text-decoration: underline;
}
-->
</style>
<title>新闻列表</title><body><center>

<center>
<%set rs=server.CreateObject("adodb.recordset")
sql="select * from y_news order by y_id desc"
 rs.open sql,conn,1,1
if rs.bof and rs.eof then
response.Write("当前没有新闻!‖<a href=wwdt.asp>返回</a>‖<a href=ad_mmgx.asp>密码管理</a>‖<a href=add_news.asp>添加新闻</a>")
else
%>

  <table width="721" height="69" border="0" cellpadding="0" cellspacing="1" bgcolor="#000000">
    <tr align="center" bgcolor="#FFFFFF">
      <td colspan="8"><DIV class=wenzi align=center>新闻列表‖<a href=news.asp>返回</a>‖‖<a href=ad_mmgx.asp>修改密码</a>‖<a href=session_out.asp>退出</a>‖<a href=add_news.asp>添加新闻</a></DIV></td>
    </tr>
    <tr align="center" bgcolor="#DFDFDF">
      <td width="51">ID</td>
      <td width="96">日期</td>
      <td width="226">主题</td>
      <td width="82">浏览次数</td>
      <td width="82">发布人</td>
      <td width="82">详细</td>
      <td width="46">删除</td>
      <td width="47">编辑</td>
    </tr>
<%i=1
do until rs.eof %>
    <tr align="center" bgcolor="#FFFFFF">
      <td><%=i%></td>
      <td><%=rs("y_time")%></td>
      <td><%=rs("y_title")%></td>
      <td><%=rs("y_hits")%></td>
      <td><%=rs("y_name")%></td>
      <td><a href="shownews.asp?id=<%=rs("y_id")%>" onClick="return openpage(this.href);">详细</a> </td>
      <td><script language="JavaScript">
<!--
function suredo(src,q)
    {
      var ret;
      ret = confirm(q);
      if(ret!=false)window.location=src;
    }
//-->
</script>

<a href='javascript:suredo("list_del.asp?id=<%=rs("y_id")%>","确定删除?")'>删除</a></td>
      <td><a href="edi_news.asp?id=<%=rs("y_id")%>">编辑</a></td>
    </tr>
<%i=i+1
rs.movenext
loop


end if
rs.close
set rs=nothing%>
  </table>

</table>
</center>

⌨️ 快捷键说明

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