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

📄 sell.asp

📁 <1> 优化了部分代码及一些BUG.提高了浏览速度 <2> 可以通过会员助手自由管理各种信息 <3> 修正了反馈信息及询价订单错误 <4>
💻 ASP
字号:
<!--#include file=system/include/config.asp-->
<!--#include file=conn_view.asp-->
<!--#include file=system/include/function.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">
<LINK href="images/style1.css" type=text/css rel=stylesheet>
</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: 1px; border-bottom-width: 0px; border-left-width: 0px}
</style>
<script language="JavaScript" src="share/nei_fc.js"></script>
<script language="JavaScript">
<!--
	function checksearch()
	{
	if(!CheckIsNumeric(search.search_mj_min,"请在输入框中输入数值!")) return false;
	if(!CheckIsNumeric(search.search_mj_max,"请在输入框中输入数值!")) return false;
	if(!CheckIsNumeric(search.search_jg_min,"请在输入框中输入数值!")) return false;
	if(!CheckIsNumeric(search.search_jg_max,"请在输入框中输入数值!")) return false;
	}
//-->
</script>
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" onLoad="cleinput()">
<!--#include file="top1.asp"-->
<table width="778" border="0" cellspacing="0" cellpadding="0" align="center">
  <tr align="left" valign="top"> 
    <td width="131"><img src="images/hack_r2_c1.jpg" width="155" height="92"></td>
    <td width="647">
           <table width="623" border="0" cellspacing="0" cellpadding="0">
        <tr align="left" valign="top"> 
          <td width="623" height="51" background="images/sell_top.jpg"><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="623" height="50">
              <param name=movie value="images/nei_banner1.swf">
			  <param name=WMODE value=Transparent>
              <param name=quality value=high>
              <embed src="images/nei_banner1.swf" quality=high pluginspage="http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" width="623" height="50">
              </embed> 
            </object></td>
        </tr>
      </table>
      
    </td>
  </tr>
</table>
<table width="778" border="0" cellspacing="0" cellpadding="0" align="center">
  <tr align="left" valign="top"> 
    <td width="125" bgcolor="#fff9e2" class="rightkuan">
<!--#include file="share/nei_login.htm"-->
      <!--#include file="share/nei_dengji.htm"-->
      <!--#include file="share/nei_gfzn.htm" -->
      <!--#include file="share/nei_lyb.htm"-->
    </td>
    <td width="653"> 
      <table width="624" border="0" cellspacing="0" cellpadding="0">
        <tr align="left" valign="top"> 
          <td width="260" height="172"><img src="images/sell_center.jpg" width="260" height="172"></td>
          <td width="10" background="images/hack_r4_c18.jpg"><img src="images/hack_r4_c11.jpg" width="6" height="172"></td>
          <td width="329" background="images/hack_r4_c18.jpg"><img src="images/sell_r4_c12.gif" width="175" height="42"><br>
            <table width="326" border="0" cellpadding="0" cellspacing="0">
              <form action="search_sell.asp" method=post name="search" onSubmit="return checksearch()">
                <tr align="left" valign="middle"> 
                  <td width="163" height="25" class="font"><font color="#0066CC">区域:</font> 
                    <select name="search_qy" style="FONT-SIZE: 9pt; WIDTH: 90px; FONT-FAMILY: 宋体; HEIGHT: 22px" >
                    <option value="不限" selected>不限</option>
                      <option value="武进区">武进区</option>
                      <option value="钟楼区">钟楼区</option>
                      <option value="天宁区">天宁区</option>
                      <option value="新北区">新北区</option>
                      <option value="戚墅堰区">戚墅堰区</option>
                      <option value="溧阳">溧阳</option>
                      <option value="金坛">金坛</option>
                      <option value="其他">其他</option>
                    </select>
                  </td>
                  <td width="163" class="font"><font color="#0066CC">物业类型:</font> 
                    <select name=search_lx class="textinput">
                      <option value="" selected>-内容不限-</option>
                      <option value="商品房">商品房</option>
                      <option value="集资房">集资房</option>
                      <option value="拆迁房">拆迁房</option>
                      <option value="写字楼">写字楼</option>
                      <option value="公房">公房</option>
                      <option value="店面">店面</option>
                      <option value="民房">民房</option>
                      <option value="别墅">别墅</option>
                    </select></td>
                </tr>
                <tr align="left" valign="middle"> 
                  <td height="25" class="font"><font color="#0066CC">户型:</font> 
                    <select 
        name=search_hx style="FONT-SIZE: 9pt; WIDTH: 90px; FONT-FAMILY: 宋体; HEIGHT: 22px" >
                      <option value="" selected>-内容不限-</option>
                      <option value="4室2厅2卫">4室2厅2卫</option>
                      <option value="4室2厅1卫">4室2厅1卫</option>
                      <option value="4室1厅1卫">4室1厅1卫</option>
                      <option value="3室2厅2卫">3室2厅2卫</option>
                      <option value="3室2厅1卫">3室2厅1卫</option>
                      <option value="3室1厅1卫">3室1厅1卫</option>
                      <option value="2室2厅1卫">2室2厅1卫</option>
                      <option value="2室1厅1卫">2室1厅1卫</option>
                      <option value="2室半1厅1卫">2室半1厅1卫</option>
                      <option value="1室1厅1卫">1室1厅1卫</option>
                      <option value="单间">单间</option>
                      <option value="复式">复式</option>
                      <option value="其他">其他</option>
                    </select> </td>
                  <td height="25" class="font"><font color="#0066CC">是否中介:</font> 
                    <select name="search_zj" class="textinput">
                      <option value="" selected>-内容不限-</option>
                      <option value="非中介">非中介</option>
                      <option value="中介">中介</option>
                    </select></td>
                </tr>
                <tr align="left" valign="middle"> 
                  <td height="25" class="font"><font color="#0066CC">面积:</font> 
                    <input name="search_mj_min" type="text" class="textinput" id="min" size="1">
                    ~ 
                    <input name="search_mj_max" type="text" class="textinput" id="max" size="1">
                    ㎡</td>
                  <td height="25" class="font"><font color="#0066CC">价格:</font> 
                    <input name="search_jg_min" type="text" class="textinput" id="min23" size="1">
                    ~ 
                    <input name="search_jg_max" type="text" class="textinput" id="max23" size="1">
                    万元</td>
                </tr>
                <tr align="center" valign="bottom" > 
                  <td height="34" colspan="2" class="font"><input name="imageField" type="image" src="images/search.gif" width="60" height="23" border="0"> 
                  </td>
                </tr>
              </form>
            </table> </td>
          <td width="25" align="right"><img src="images/hack_r4_c20.jpg" width="25" height="172"></td>
        </tr>
      </table>

      <table width="624" border="0" cellpadding="0" cellspacing="1" bgcolor="#FFCC99">
	  <form name="form4" method="post">
          <%
	dim strSql,rs,i,PageNo
	strSql="select * from [house_sell] where pass='是' order by id desc"
	set rs=Server.CreateObject("ADODB.RecordSet")
	rs.open strSql,conn,3,3
	rs.PageSize=20
	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="#F0F0F0"> 
            <td width="55" height="21" class="font"><font color="#FF6600">是否中介</font></td>
            <td width="190" height="25" class="font" bgcolor="#F0F0F0"><font color="#FF6600">小区名称</font></td>
            <td width="62" height="21" class="font"><font color="#FF6600">所属区域</font></td>
            <td width="113" height="21"><font color="#FF6600" class="font">房型</font></td>
            <td width="63" height="21"><font color="#FF6600" class="font">面积(㎡)</font></td>
            <td width="58" height="21"><font color="#FF6600" class="font">售价(万)</font></td>
            <td width="83"><font color="#FF6600" class="font">登记时间</font></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" ><%=rs("zj")%></td>
            <td height="21" ><a href="sub_sell.asp?id=<%=rs("id")%>" target="_blank" class="linkfont"><font color="#FF6600"><%=left(rs("house_name"),12)%></font></a></td>
            <td height="21" class="font" ><%=rs("qy")%></td>
            <td height="21" class="font" ><%=rs("hx")%></td>
            <td height="21" class="font" ><%=rs("jz_area")%></td>
            <td height="21" class="font" ><%=rs("pay")%></td>
            <td class="font" ><%if replace(now(),right(now(),8),"")=replace(rs("date"),right(rs("date"),8),"") then %>
			<font color="#FF6600"><%=replace(rs("date"),right(rs("date"),8),"")%></font>
			<%else%>
			<%=replace(rs("date"),right(rs("date"),8),"")%>
			<%end if%></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="7" class="font" > 
              <%
			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("<font color=#929292>每页显示</font><font color=red>" & rs.pagesize & "</font><font color=#929292>条</font> &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;")
			out("<a href=""sell.asp?PageNo=1"" class=""menu1"">[首页]</a>&nbsp;")
		    out("<a href=""sell.asp?PageNo=" & (PageNo-1) & """ class=""menu1"">[上一页]</a>&nbsp;")
		    out("<a href=""sell.asp?PageNo=" & (PageNo+1) & """ class=""menu1"">[下一页]</a>&nbsp;")
			out("<a href=""sell.asp?PageNo=" & rs.pagecount & """ class=""menu1"">[尾页]</a>&nbsp;")
	  dim pag
	  %>
              <select name="jump" class="textinput" onchange="javascript:window.open('sell.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> 
            <td colspan="7"> 
              <div align="center" class="font">没有数据!</div>
            </td>
          </tr>
          <%
		end if 
		rs.close
		set rs=nothing
  %>
  </form>
      </table>
      
    </td>
  </tr>
</table>
<!--#include file="share/foot.htm"-->
</body>
</html>

⌨️ 快捷键说明

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