📄 newhouse.asp
字号:
<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>
<td></td>
<td></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" bgcolor="white" >
<%
out("<font color=#929292>当前页次:</font><font color=red>" & PageNo & "/" & rs.pagecount & "</font> ")
out("<font color=#929292>共</font><font color=red>" & rs.pagecount & "</font><font color=#929292>页</font> ")
out("<font color=#929292>共</font><font color=red>" & rs.recordcount & "</font><font color=#929292>条记录</font> ")
out("<font color=#929292>每页显示</font><font color=red>" & rs.pagesize & "</font><font color=#929292>条</font> ")
out("<a href=""newhouse.asp?PageNo=1"" class=""menu1"">[首页]</a> ")
out("<a href=""newhouse.asp?PageNo=" & (PageNo-1) & """ class=""menu1"">[上一页]</a> ")
out("<a href=""newhouse.asp?PageNo=" & (PageNo+1) & """ class=""menu1"">[下一页]</a> ")
out("<a href=""newhouse.asp?PageNo=" & rs.pagecount & """ class=""menu1"">[尾页]</a> ")
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>
</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 style="BORDER-LEFT: #d8d8d8 1px solid; height=" 151" align="center" valign="top" bgcolor="white">
<table width="173" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center" valign="bottom" height="29" width="173"><img src="images/MEMER.gif" width="173" height="34" border="0"></td>
</tr>
</table>
<% if session("userlogin") <> "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">用户名：</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">密 码：</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"> </td>
<td width="124" bgcolor="#FFFFFF" align="left" valign="middle"><span class="font"> 您好！<font color=red><%=session("user_name")%></font><br>
欢迎来到本站...</span><br>
<a href="member.asp" class="ffbyfont">[进入控制面板]</a><br>
<a href="logout.asp" target="_parent"><img src="images/logout.gif" width="62" height="18" border="0"></a>
</td>
<td width="16" class="font"> </td>
</tr>
</table>
<br>
<% end if %>
<br>
<img src="images/newhouse_r4_c5.gif" width="173" height="34"><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 class="font"><br>区 域：</font>
<select name="search_qy" id="search_qy" style="FONT-SIZE: 9pt; WIDTH: 90px; FONT-FAMILY: 宋体; HEIGHT: 22px" >
<option value="" selected>-请选择-</option>
<%
connstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="
connstr = connstr & Server.MapPath("efwmanager/mdb/view.asp")
set conn=Server.CreateObject("AdoDb.Connection")
conn.Open connstr
dim Sql,rs0
Sql="select * from [area] order by id"
set rs0=Server.CreateObject("ADODB.RecordSet")
rs0.open Sql,conn,1,1
do while not rs0.eof
%>
<option value="<%=rs0("area_name")%>"><%=rs0("area_name")%></option>
<%
rs0.movenext
loop
rs0.close
%>
</select> </td>
</tr>
<tr>
<td align="left" valign="middle" width="159" height="30"> <font 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"> </font></td>
</tr>
<tr>
<td align="left" valign="middle" width="159" height="30"><font 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 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="173" height="34"><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="adinfo/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="http://www.rongqiao.com/rxlp/yhjj2q/index.htm" target="_blank"><img src="adinfo/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="ad/lixian/lxjy.htm" target="_blank"><img src="adinfo/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="http://www.rongqiao.com/rxlp/rqjjb2/index.htm" target="_blank"><img src="adinfo/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 + -