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

📄 admin_ckdd.asp

📁 十分好的音乐网站源码 十分好的音乐网站源码十分好的音乐网站源码十分好的音乐网站源码十分好的音乐网站源码
💻 ASP
字号:
<!--#include file=../conn/adodb1.asp -->
<%
if session("cjuser")="" and session("pwdd")="" then
response.write"<SCRIPT language=JavaScript>alert('你没有登录,无权进入!');"
response.write"this.location.href='error.htm';</SCRIPT>" 
response.end 
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="css/main.css" rel="stylesheet" type="text/css">
</head>

<body link="#000000" vlink="#000000">
<table width="100%" border="0" align="center" cellspacing="0">

  <tr > 
    <td height="10" align="center"> 
      <%

	dim sql,rs
	set rs=server.CreateObject("adodb.recordset")
        sql="select * from orderform order by ddsj desc"
    
	session("sql")=sql
	
	rs.open sql,db,1,1
	
if rs.recordcount >0 then
 
   dim page_no    '定义当前是第几页
   if request.querystring("page_no")="" then
   page_no=1
   else
   page_no=cint(request.querystring("page_no"))
   end if
   rs.pagesize=18
   rs.absolutepage=page_no
  %>
      <table width="100%" border="0" cellpadding="0" cellspacing="1"  >
        <tr class="fenlei" > 
          <td width="13%" align="center"><strong>订单编码</strong></td>
          <td width="13%" align="center"><strong>房源编码</strong></td>
          <td width="13%" align="center"><strong>信息类型</strong></td>
		  <td width="10%" align="center" ><strong>订单人</strong></td>
          <td width="18%" align="center"><strong>联系电话</strong></td>
          <td width="13%" align="center"><strong>订单日期</strong></td>
          <td width="13%" align="center"><strong>查看</strong></td>
		  <td width="13%" align="center"><strong>删除</strong></td>
		 
        </tr>
        <%
  dim i
  for i=1 to rs.pagesize
  %>
        <tr width="100%" 
  onmouseover="this.style.backgroundColor = '#F7FBFF'" 
  onmouseout="this.style.backgroundColor = '#FFFFFF'"> 
          <td align="center" class="bordbg"><%=rs("ddhm")%></td>
          <td align="center" class="bordbg"><%=rs("fybm")%></td>
		  <td align="center" class="bordbg"><%=rs("xxlx")%></td>
		  <td align="center" class="bordbg"><%=rs("name")%></td>
          <td align="center" class="bordbg"><%=rs("tel")%></td>
         <td align="center" class="bordbg"><%=rs("ddsj")%></td>
          <td align="center" class="bordbg"><a href="ck_ddxx.asp?id=<%=rs("id")%>" class="fontt" >查看</a></td>
		  <td align="center" class="bordbg"><a href="ck_ddxx_del.asp?id=<%=rs("id")%>" class="fontt" >删除</a></td>
        

        </tr>
        <%
  rs.movenext
if rs.eof then exit for 
   next
  %>
      </table>
      <br> 
  <tr> 
    <td height="20" align="center" class="font10"> 
      <%if page_no>1 then %>
      <a href="admin_ckdd_fy.asp?page_no=<%=page_no-1%>" class="font10">[上一页]</a> 
      <%end if%>
      <%

  for i=1 to rs.pagecount
    if i=page_on then
       response.write "["&i&"]"&"&nbsp;"
    else
       response.write "<a href='admin_ckdd_fy.asp?page_no="&i&"'>" & i &"</a>&nbsp"
    end if
 next
  if page_no<rs.pagecount then
  %>
      <a href="admin_ckdd_fy.asp?page_no=<%=page_no+1%>" class="font10">[下一页]</a> 
      <%
  end if
  %>
      共:<%=rs.pagecount%>页 
      <%else
response.write "没有任何数据!"
end if

%>
    </td>
  </tr></td></tr>
  <tr bgcolor="#FFFFFF"> 
    <td align="center" bgcolor="#FFFFFF" class="fontt">&nbsp;</td>
  </tr>
  <tr bgcolor="#FFFFFF">
    <td align="center" bgcolor="#FFFFFF" class="hh">&nbsp;</td>
  </tr>
</table>
</body>
</html>

⌨️ 快捷键说明

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