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

📄 view_olddd.asp

📁 <1> 优化了部分代码及一些BUG.提高了浏览速度 <2> 可以通过会员助手自由管理各种信息 <3> 修正了反馈信息及询价订单错误 <4>
💻 ASP
字号:
<!--#include file=../system/include/config.asp-->
<!--#include file=../share/conn_system.asp-->
<!--#include file=../system/include/function.asp-->
<!--#include file=../system/include/access_zj.asp-->
<html>
<head>
<title><%=title%></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../style.css" type="text/css">
</head>
<style> body{ scrollbar-face-color:fd9035; scrollbar-shadow-color:ffffff;  scrollbar-highlight-color:ffffff; scrollbar-3dlight-color:ffffff;  scrollbar-darkshadow-color:ffffff; scrollbar-track-color:ffefd7;  scrollbar-arrow-color:ffffff;} 
.rightkuan {  border-color: black #FFFFFF black black; border-style: solid; border-top-width: 0px; border-right-width: 2px; border-bottom-width: 0px; border-left-width: 0px}
.leftkuan {  border-color: black black black #FFFFFF; border-style: solid; border-top-width: 0px; border-right-width: 0px; border-bottom-width: 0px; border-left-width: 2px}
.textinput2 {  border: 1px #9c9a9c solid;BACKGROUND: #ffffff;FONT-SIZE: 9pt; FONT-FAMILY: arial}
</style>
 <script language="JavaScript">
 function openwin(page,size)
{
window.open(page,"newuser","toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=yes,resizable=no,"+ size);
} 
function mOvr(src,clrOver) { if (!src.contains(event.fromElement)){ src.bgColor = clrOver; }}function mOut(src,clrIn){ if (!src.contains(event.toElement)) { src.style.cursor = 'default'; src.bgColor = clrIn; }} function mClk(src) { if(event.srcElement.tagName=='TD'){src.children.tags('A')[0].click();} }

 </script>
<SCRIPT>
    function Toggle(e)
    {
	if (e.checked) {
	    document.form4.toggleAll.checked = AllChecked();
	}
	else {
	    document.form4.toggleAll.checked = false;
	}
    }

    function ToggleAll(e)
    {
	if (e.checked) {
	    CheckAll();
	}
	else {
	    ClearAll();
	}
    }

    function CheckAll()
    {
	var ml = document.form4;
	var len = ml.elements.length;
	for (var i = 0; i < len; i++) {
	    var e = ml.elements[i];
	    if (e.name == "checkbox") {
		e.checked = true;
	    }
	}
	ml.toggleAll.checked = true;
    }

    function ClearAll()
    {
	var ml = document.form4;
	var len = ml.elements.length;
	for (var i = 0; i < len; i++) {
	    var e = ml.elements[i];
	    if (e.name == "checkbox") {
		e.checked = false;
	    }
	}
	ml.toggleAll.checked = false;
    }

    function AllChecked()
    {
	ml = document.form4;
	len = ml.elements.length;
	for(var i = 0 ; i < len ; i++) {
	    if (ml.elements[i].name == "checkbox" && !ml.elements[i].checked) {
		return false;
	    }
	}
	return true;
    }
</SCRIPT>

<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0">
<!--#include file="../share/gg_top.htm"-->
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr align="left" valign="top"> 
    <td width="198"><img src="images/zjuser_r2_c1.gif" width="198" height="139"></td>
    <td width="184"><img src="images/zjuser_r2_c8.gif" width="201" height="139"></td>
    <td width="396" background="images/zjuser_r2_c13.jpg"><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="379" height="139">
        <param name="movie" value="../images/member.swf">
		<param name=WMODE value=Transparent>
        <param name="quality" value="high">
        <embed src="../images/member.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="379" height="139"></embed></object></td>
  </tr>
</table>
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr align="left" valign="top"> 
  <form name="form4" method="post" action="del_onlinedd.asp?ii=new" onSubmit="return checkdel()">
    <td width="10" height="406" background="../images/member_r6_c1.jpg"><img src="../images/member_r3_c1.gif" width="10" height="28"></td>
    <td width="584" align="left" height="406"> 
      <table width="582" height="28" border="0" cellpadding="0" cellspacing="0">
        <tr>
          <td width="582" height="28" align="left" valign="bottom" background="../images/member_r3_c2.gif" class="font"><a href="index.asp" class="menu">首  页 
            </a>&gt;&gt;&gt; <a href="index.asp" class="menu">房产中介管理</a> &gt;&gt;&gt; 
            查看历史订单</td>
        </tr>
      </table>
      <br>
      <table width="565" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td width="21" height="35">&nbsp;</td>
            <td width="487" height="35" valign="middle" align="left"><span class="font"><font color="#999999">您 
              好,以 下 是 您 的 历 史 订 单</font></span> </td>
          <td width="57" height="35" valign="middle" align="center"> 
            <input type="submit" name="Submit2" value="删除">
          </td>
        </tr>
      </table>
      <center>
        <table width="546" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFCC99" class="xu_kuan">
 
            <%
	dim strSql,rs,i,PageNo
	strSql="select * from [onlinedd]  where zj_id='" & session("zj_id") & "'and pass='是' order by id desc"
	set rs=Server.CreateObject("ADODB.RecordSet")
	rs.open strSql,conn,3,3
	rs.PageSize=15
	PageNo=request("PageNo")
	if PageNo<1 or not isnumeric(PageNo) then
		PageNo=1
	end if
	if cint(PageNo)>rs.PageCount then
		PageNo=rs.PageCount
	end if
%>
            <tr align="center" valign="middle" bgcolor="#FFEAB3"> 
              <td width="73" height="21" class="font"><font color="#FF6600" class="font">预定时间</font></td>
              <td width="127" height="25" class="font"><font color="#FF6600">订单号</font></td>
              <td width="115" height="21" class="font"><font color="#FF6600">房源编号</font></td>
              <td width="75" height="21"><font color="#FF6600" class="font">姓名</font></td>
              <td width="107" height="21"><font color="#FF6600" class="font">电话号码</font></td>
              <td width="49" height="21"> 
                <input type="checkbox" name="toggleAll" onClick=ToggleAll(this)>
              </td>
            </tr>
            <%
		  dim yy
		if rs.recordcount>0 then
		   rs.AbsolutePage =PageNo
		   for i=1 to rs.pageSize

			  if i/2=int(i/2) then
			  yy="#ffffff"
			  else
			  yy="#fff9e1"
			  end if
  %>
            <tr align="center" valign="middle" bgcolor="<%=yy%>" onMouseOver="mOvr(this,'#FFECD9');"  onMouseOut="mOut(this,'<%=yy%>');"> 
              <%if rs.eof then
			response.write ("<td height=21></td>")
            response.write ("<td height=21></td>")
            response.write ("<td height=21></td>")
            response.write ("<td height=21></td>")
            response.write ("<td height=21></td>")
            response.write ("<td height=21></td>")
            response.write ("<td></td>")
			else%>
              <td height="21" class="font" width="73" ><%=replace(rs("date"),right(rs("date"),8),"")%></td>
              <td height="21" width="127" ><a href="javascript:openwin('sub_dd.asp?id=<%=rs("id")%>&amp;ii=old','top=0,left=0,width=418,height=200')" class="linkfont"><font color="#FF6600"><%=rs("ddh")%></font></a></td>
              <td height="21" class="font" width="115" ><%=rs("house_bh")%></td>
              <td height="21" class="font" width="75" ><%=rs("name")%></td>
              <td height="21" class="font" width="107" ><%=rs("tel")%></td>
              <td height="21" width="49" >
                <input type="checkbox" name="checkbox" value="<%=rs("id")%>">
              </td>
              <%end if%>
            </tr>
            <%
		  if not rs.eof then
				rs.movenext
		  end if
			next
  %>
            <tr align="right" valign="middle" bgcolor="#FFE7CE"> 
              <td height="28" colspan="6" class="font" > 
                <%
				session("pagecount")=rs.pagecount
			out("<font color=#929292>当前页次:</font><font color=red>" & PageNo & "/" & rs.pagecount & "</font> &nbsp;&nbsp;")
			out("<font color=#929292>共</font><font color=red>" & rs.pagecount & "</font><font color=#929292>页</font> &nbsp;&nbsp;")
			out("<font color=#929292>共</font><font color=red>" & rs.recordcount & "</font><font color=#929292>条记录</font> &nbsp;&nbsp;")
			out("<a href=""view_newdd.asp?PageNo=1"" class=""menu1"">[首页]</a>&nbsp;")
		    out("<a href=""view_newdd.asp?PageNo=" & (PageNo-1) & """ class=""menu1"">[上一页]</a>&nbsp;")
		    out("<a href=""view_newdd.asp?PageNo=" & (PageNo+1) & """ class=""menu1"">[下一页]</a>&nbsp;")
			out("<a href=""view_newdd.asp?PageNo=" & rs.pagecount & """ class=""menu1"">[尾页]</a>&nbsp;")
	  dim pag
	  %>
                <select name="jump" class="textinput" onchange="javascript:window.open('view_newdd.asp?pageno='+this.options[this.selectedIndex].value,'_self')">
                  <% for pag=1 to rs.pagecount
				if int(pageno)=pag then %>
                  <option value=<%=pageno%> selected><%=pageno%></option>
                  <%else%>
                  <option value="<%=pag%>"><%=pag%></option>
                  <%
				end if
				next %>
                </select>
                &nbsp; </td>
            </tr>
            <% else %>
            <tr bgcolor="#fff9e1"> 
              <td colspan="6" height="98"> 
                <div align="center" class="font">客 户 还 未 给 您 下 订 单!</div>
              </td>
            </tr>
            <%
		end if 
		rs.close
		set rs=nothing
  %>

        </table>
      </center>
    </td>
    <td width="184" align="center" valign="top" background="../images/member_r4_c6.gif" height="406"><img src="../images/member_r3_c6.gif" width="186" height="13"><br>
      <br><!--#include file="share_menu.htm"-->
<br>
    </td>
	</form>
  </tr>
</table>
<!--#include file="../share/gg_foot.htm"-->
</body>
</html>
<!--#include file=../system/include/foot.asp-->

⌨️ 快捷键说明

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