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

📄 newhouse.asp

📁 <1> 优化了部分代码及一些BUG.提高了浏览速度 <2> 可以通过会员助手自由管理各种信息 <3> 修正了反馈信息及询价订单错误 <4>
💻 ASP
📖 第 1 页 / 共 2 页
字号:
	end if
%>
          <tr align="center" valign="middle" bgcolor="#F0F0F0"> 
            <td width="159" height="21" class="font">楼盘名称</td>
            <td width="124" height="25" class="font" bgcolor="#F0F0F0">均价(元/平米)</td>
            <td width="75" height="21" class="font">区域</td>
            <td width="240" height="21" class="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></td>")
			else%>
            <td height="21" class="font" width="159" ><a href="sub_newhouse.asp?id=<%=rs("id")%>" target="_blank" class="linkfont"><font color="#FF6600"><%=rs("house_name")%></font></a></td>
            <td height="21" width="124" class="font"><%=rs("jun_pay")%></td>
            <td height="21" class="font" width="75" ><%=rs("qy")%></td>
            <td height="21" class="font" width="240" ><%=rs("sell_tel")%></td>
            <%end if%>
          </tr>
          <%
		  if not rs.eof then
				rs.movenext
		  end if
			next
  %>
          <tr align="right" valign="middle" bgcolor="#FFE7CE"> 
            <td height="28" class="font" colspan="6" > 
              <%
			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;")
			out("<a href=""newhouse.asp?PageNo=1"" class=""menu1"">[首页]</a>&nbsp;")
		    out("<a href=""newhouse.asp?PageNo=" & (PageNo-1) & """ class=""menu1"">[上一页]</a>&nbsp;")
		    out("<a href=""newhouse.asp?PageNo=" & (PageNo+1) & """ class=""menu1"">[下一页]</a>&nbsp;")
			out("<a href=""newhouse.asp?PageNo=" & rs.pagecount & """ class=""menu1"">[尾页]</a>&nbsp;")
	  dim pag
	  %>
              <select name="jump" class="textinput" onChange="javascript:window.open('newhouse.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="6"> 
              <div align="center" class="font">没有数据!</div>
            </td>
          </tr>
          <%
		end if 
		rs.close
		set rs=nothing
  %>
        </form>
      </table>
      
    </td>
    <td height="151" align="center" valign="top" background="images/newhouse_r2_c4.gif">
      <table width="173" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td align="center" valign="bottom" height="29" width="173"><img src="images/newhouse_r10_c5.gif" width="160" height="19"></td>
        </tr>
      </table>
      <% if session("adminlogin") <> "ok" then  %>
      <br>
      <table width="154" border="0" cellspacing="0" cellpadding="0">
        <form action="checklogin.asp" method=post name="form1" onSubmit="return checklogin()">
          <tr valign="middle"> 
            <td width="58" height="32" align="right" class="font"><font color="#FF6600">用户名:</font></td>
            <td width="96"> 
              <input type="text" name="username" size="10" class="textinput">
            </td>
          </tr>
          <tr valign="middle"> 
            <td width="58" align="right" class="font"><font color="#FF6600">密 码:</font></td>
            <td width="96"> 
              <input type="password" name="password" size="10" class="textinput">
            </td>
          </tr>
          <tr align="center" valign="middle"> 
            
      <td height="46" colspan="2"> 
        <input name="imageField" type="image" src="images/login.gif" width="35" height="18" border="0">
        <a href="reg1.asp"><img src="images/reg.gif" width="62" height="18" border="0"></a> 
      </td>
          </tr>
        </form>
      </table>
<% else %>
<br>
<table width="154" border="0" cellspacing="0" cellpadding="0">
  <tr> 
    <td width="14" height="92">&nbsp;</td>
    <td width="124" bgcolor="#FFFFFF" class="xu_kuan" align="left" valign="middle"><span class="font"> 您好!<font color=red><%=session("user_name")%></font><br>
       欢迎来到本站...</span><br>
      &nbsp;&nbsp;<a href="member.asp" class="ffbyfont">[进入控制面板]</a><br>
      &nbsp;&nbsp;&nbsp;&nbsp;<a href="logout.asp" target="_parent"><img src="images/logout.gif" width="62" height="18" border="0"></a> 
    </td>
    <td width="16" class="font">&nbsp;</td>
  </tr>
</table>
<br>
<% end if %>

      <br>
      <img src="images/newhouse_r4_c5.gif" width="160" height="20"><br>
      <table width="159" border="0" cellspacing="0" cellpadding="0" align="center">
	  <form name="form2" method="post" action="search_newhouse.asp">
        <tr> 
          <td align="left" valign="middle" width="159" height="30"><font color="#FF6600" class="font">区 域:</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>
            <font color="#0066CC">&nbsp;</font></td>
        </tr>
        <tr> 
          <td align="left" valign="middle" width="159" height="30"> <font color="#FF6600" class="font">价 格:</font> 
            <input name="search_jg_min" type="text" style="FONT-SIZE: 9pt; WIDTH: 25px; FONT-FAMILY: 宋体; HEIGHT: 22px" size="1">
            <span class="font">~</span> 
            <input name="search_jg_max" type="text" style="FONT-SIZE: 9pt; WIDTH: 25px; FONT-FAMILY: 宋体; HEIGHT: 22px" size="1">
            <span class="font">元</span><font color="#0066CC">&nbsp;</font></td>
        </tr>
        <tr> 
          <td align="left" valign="middle" width="159" height="30"><font color="#FF6600" class="font">家 具:</font> 
              <input name="house_name" type="text" style="FONT-SIZE: 9pt; WIDTH: 80px; FONT-FAMILY: 宋体; HEIGHT: 22px" size="20">
          </td>
        </tr>
        <tr> 
          <td align="left" valign="middle" width="159" height="30"><font color="#FF6600" class="font">开发商:</font> 
              <input name="kfs" type="text" style="FONT-SIZE: 9pt; WIDTH: 80px; FONT-FAMILY: 宋体; HEIGHT: 22px" size="20">
          </td>
        </tr>
        <tr> 
          <td align="center" valign="middle" width="159" height="32"> 
            <input name="imageField32" type="image" src="images/search.gif" width="60" height="23" border="0">
          </td>
        </tr>
		</form>
      </table>
      <br>
      <img src="images/newhouse_r8_c5.gif" width="160" height="19"><br>
      <table width="89%" border="0" cellspacing="0" cellpadding="0">
        <%
	strSql="select top 10 * from [house_new] order by id desc"
	set rs=Server.CreateObject("ADODB.RecordSet")
	rs.open strSql,conn,3,3
    %>
        <tr> 
          <td height="17" class="font"> 
            <%do while not rs.eof%>
            <font color="#FF6600">·</font><a href="sub_newhouse.asp?id=<%=rs("id")%>" target="_blank" class="menu"><font color=<%=rs("color")%>><%=left(rs("house_name"),6)%></font></a> 
            <font color="#999999"><%=rs("jun_pay")%>元/件</font> 
            <%
		rs.movenext
	if not rs.eof then 
	response.write "<br>"
	end if
		loop%>
          </td>
        </tr>
        <tr> 
          <td align="center" valign="middle" height="60"><a href="ad/hongxia/hongxia.htm" target="_blank"><img src="ad/gif/hongxia.gif" width="125" height="50" class="black_kuan" border="0"></a></td>
        </tr>
        <tr> 
          <td align="center" valign="middle" height="60"><a href="#" target="_blank"><img src="ad/gif/YH.gif" width="125" height="50" class="black_kuan" border="0"></a></td>
        </tr>
        <tr> 
          <td align="center" valign="middle" height="60"><a href="#" target="_blank"><img src="ad/gif/lixian.gif" width="125" height="50"  class="black_kuan" border="0"></a></td>
        </tr>
        <tr> 
          <td align="center" valign="middle" height="60"><a href="#" target="_blank"><img src="ad/gif/LQB.gif" width="125" height="50" class="black_kuan" border="0"></a></td>
        </tr>
      </table>
      <br>
    </td>
  </tr>
</table>
<!--#include file="share/foot.htm"-->
</body>
</html>

⌨️ 快捷键说明

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