📄 xxcx.asp
字号:
<!--#include file=conn/adodb.asp-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><!--#include file=title.asp-->--查询信息</title>
<style type="text/css">
<!--
.fontt {
font-size: 10pt;
text-decoration: none;
}
-->
</style>
<style type="text/css">
<!--
a:hover {
font-weight: bold;
color: #FF6600;
text-decoration: underline;
}
-->
</style>
<style type="text/css">
<!--
.hh {
line-height: 1pt;
}
-->
</style>
</head>
<body bgcolor="#999999" link="#000000" vlink="#000000" topmargin="0">
<table width="80%" border="0" align="center" cellspacing="0">
<tr bgcolor="#FFFFFF">
<td colspan="3" valign="bottom" bgcolor="#FFFFFF" class="fontt" >
<!--#include file=top.asp-->
</td>
</tr>
<tr bgcolor="#FFFFFF">
<td colspan="3" valign="bottom" bgcolor="#FFFFFF" class="hieght" > </td>
</tr>
<tr bgcolor="#FFFFFF">
<td colspan="3" bgcolor="#333333" class="hh"> </td>
</tr>
<tr bgcolor="#FFFFFF">
<td colspan="3" bgcolor="#FFFFFF"> </td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="26%" height="10" align="center" bgcolor="#FFFFFF" class="fontt">
<%
on error resume next
dim lx,qy,jg,s,t,w,min,max
lx=trim(request.form("lx"))
session("lx")=lx
qy=trim(request.form("qy"))
s=trim(request.form("s"))
t=trim(request.form("t"))
w=trim(request.form("w"))
flx=trim(request.form("flx"))
min=trim(request.form("min"))
max=trim(request.form("max"))
db.begingtrans'事务处理
dim sql,rs
set rs=server.CreateObject("adodb.recordset")
if lx="出售" and qy<>"" and s<>"" and t<>"" and w<>"" and flx<>"" and min<>"" and max<>"" then
sql="select * from chushou where qy='"& qy &"'and s='"&s&"'and t='"&t&"',w='"&w&"' and flx='"&flx&"' and fwmj>=cint('"&min&"') and fwmj<=cint('"&max&"') order by fbsj desc"
elseif lx="出售" and qy<>"" then
sql="select * from chushou where qy='"& qy &"' order by fbsj desc"
elseif lx="出售" then
sql="select * from chushou order by fbsj desc"
elseif lx="出租" and qy<>"" and s<>"" and t<>"" and w<>"" and flx<>"" and min<>"" and max<>"" then
sql="select * from chuzu where qy='"& qy &"'and s='"&s&"'and t='"&t&"'and w='"&w&"' and fylb='"&flx&"' and fwmj>=cint('"&min&"') and fwmj<=cint('"&max&"') order by fbsj desc"
elseif lx="出租" and qy<>"" then
sql="select * from chuzu where qy='"& qy &"' order by fbsj desc"
elseif lx="出租" then
sql="select * from chuzu order by fbsj desc"
elseif lx="求租" and qy<>"" and s<>"" and t<>"" and w<>"" and flx<>"" and min<>"" and max<>"" then
sql="select * from qiuzu where qy='"& qy &"'and s='"&s&"'and t='"&t&"'and w='"&w&"'and flx='"&flx&"'and fwmj>=cint('"&min&"') and fwmj<=cint('"&max&"') order by fbsj desc"
elseif lx="求租" and qy<>"" then
sql="select * from qiuzu where qy='"& qy &"' order by fbsj desc"
elseif lx="求租" then
sql="select * from qiuzu order by fbsj desc"
elseif lx="求购" and qy<>"" and s<>"" and t<>"" and w<>"" and flx<>"" and min<>"" and max<>"" then
sql="select * from qiugou where qy='"& qy &"'and s='"&s&"'and t='"&t&"'and w='"&w&"'and flx='"&flx&"' and fwmj>=cint('"&min&"') and fwmj<=cint('"&max&"') order by fbsj desc"
elseif lx="求购" and qy<>"" then
sql="select * from qiugou where qy='"& qy &"' order by fbsj desc"
elseif lx="求购" then
sql="select * from qiugou order by fbsj desc"
end if
session("sql")=sql
rs.open sql,db,1,1
if db.errors.count=0 then
if rs.recordcount >0 then
%> <!--#include file="cx.asp"-->
<br>
<td align="center" background="image/row.gif" bgcolor="#FFFFFF" class="fontt">
<td width="73%" align="center" valign="top" bgcolor="#FFFFFF" class="fontt">
<table width="95%" border="0" cellpadding="0" cellspacing="1" bgcolor="#cccccc" class="fontt" >
<tr bgcolor="#eeeeee" height="30" >
<td align="center"><strong>房源类别</strong></td>
<td align="center" ><strong>区域</strong></td>
<td align="center"><strong>结构</strong></td>
<td align="center"><strong>楼层</strong></td>
<td align="center"><strong>价格</strong></td>
<td align="center"><strong>位置</strong></td>
<td align="center"><strong>查看</strong></td>
</tr>
<%
if not isempty(request("page")) then
pagecount=cint(request("page"))
else
pagecount=1
end if
rs.pagesize=11
rs.AbsolutePage=pagecount
do while not rs.eof
%>
<tr bgcolor="#ffffff" width="100%"
onmouseover="this.style.backgroundColor = '#F7FBFF'"
onmouseout="this.style.backgroundColor = '#FFFFFF'">
<td height="25" align="center"><%=rs("fylb")%></td>
<td height="25" align="center"><%=rs("qy")%></td>
<td height="25" align="center"><%=rs("s")%>室<%=rs("t")%>厅<%=rs("w")%>卫</td>
<td height="25" align="center"><%=rs("szc")%></td>
<td height="25" align="center"><%=rs("jg")%></td>
<td height="25" align="center"><%=rs("wz")%></td>
<%if lx="求购" then%>
<td height="25" align="center"><a href="chakan_qiugou.asp?id=<%=rs("id")%> "target="_blank">查看</a></td>
<%elseif lx="求租" then%>
<td height="25" align="center"><a href="chakan_qiuzu.asp?id=<%=rs("id")%> " target="_blank">查看</a></td>
<%elseif lx="出售" then%>
<td height="25" align="center"><a href="chakan_chushou.asp?id=<%=rs("id")%> " target="_blank">查看</a></td>
<%elseif lx="出租" then%>
<td height="25" align="center"><a href="chakan_chuzu.asp?id=<%=rs("id")%>" target="_blank">查看</a></td>
<%end if%>
</tr>
<%
rs.movenext
i=i+1
if i>=rs.pagesize then exit do
loop
%>
</table>
<tr>
<td height="23" colspan="3" align="center" bgcolor="#dddddd" class="fontt">
<div align="center">页次: <b><font color=red><%=pagecount%></font>/<%=rs.pagecount%></b>
<% if pagecount=1 and rs.pagecount<>pagecount and rs.pagecount<>0 then%>
<a href="xxcx_fy.asp?page=<%=cstr(pagecount+1)%>" class="z"> <span class="fontt"><font color="#000000">下一页</font></span></a>
<% end if %>
<% if rs.pagecount>1 and rs.pagecount=pagecount then %>
<a href="xxcx_fy.asp?page=<%=cstr(pagecount-1)%>" class="z"> <span class="fontt"><font color="#000000">上一页</font></span></a>
<%end if%>
<% if pagecount<>1 and rs.pagecount<>pagecount then%>
<a href="xxcx_fy.asp?page=<%=cstr(pagecount-1)%>" class="z"> <span class="fontt"><font color="#000000">上一页</font></span></a>
<a href="xxcx_fy.asp?page=<%=cstr(pagecount+1)%>" class="fontt"> <font color="#000000">下一页</font></a>
<% end if
%>
</div>
<%
else
response.write "没有任何数据!"
end if
db.committrans
else
db.rollbacktrans
response.write"<SCRIPT language=JavaScript>alert('没有你要查找的信息！');"
response.write"this.location.href='index.asp';</SCRIPT>"
end if
%>
</td>
</tr>
<tr>
<td colspan="3"></td>
<tr>
<td colspan="3"></tr>
<tr bgcolor="#FFFFFF">
<td colspan="3" align="center" bgcolor="#FFFFFF" class="fontt"> </td>
</tr>
<tr bgcolor="#FFFFFF">
<td colspan="3" valign="middle" bgcolor="#FFFFFF" class="hieght">
<!--#include file=bottom.asp-->
</td>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -