📄 zjgs.asp
字号:
<!--#include file="tools.asp"-->
<html><head><title>二手房信息</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312"><link href="images/zzz.css" type="text/css" rel="stylesheet">
<script language="Javascript" src="function/function.js"></script>
<script language="JavaScript">
<!--
function SnR_MarkIE(theURL,theName,alertMsg) { //v3.0.3
var agt = navigator.userAgent.toLowerCase();
var is_win = ((agt.indexOf("win")!= -1) || (agt.indexOf("16bit")!= -1));
var is_win95 = ((agt.indexOf("win95")!= -1) || (agt.indexOf("windows 95")!= -1));
var is_win16 = ((agt.indexOf("win16")!= -1) || (agt.indexOf("16bit")!= -1) || (agt.indexOf("windows 3.1")!= -1) || (agt.indexOf("windows 16-bit")!= -1) );
var is_win31 = ((agt.indexOf("windows 3.1")!= -1) || (agt.indexOf("win16")!= -1) || (agt.indexOf("windows 16-bit")!= -1));
var is_win98 = ((agt.indexOf("win98")!= -1) || (agt.indexOf("windows 98")!= -1));
var is_winnt = ((agt.indexOf("winnt")!= -1) || (agt.indexOf("windows nt")!= -1));
var is_win32 = (is_win95 || is_winnt || is_win98 || (agt.indexOf("win32")!= -1) || (agt.indexOf("32bit")!= -1));
//Error Causing Element from above line: ((is_major >= 4) && (navigator.platform == "Win32")) ||
var is_Mac = (agt.indexOf("mac") != -1);
if (document.all && (is_win32)) { //IE Windows Only
window.external.AddFavorite(theURL,theName);
}
else { // all others
alert(alertMsg);
}
}
function MM_preloadImages() { //v3.0
var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}
function MM_swapImgRestore() { //v3.0
var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}
function MM_findObj(n, d) { //v4.0
var p,i,x; if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
if(!x && document.getElementById) x=document.getElementById(n); return x;
}
function MM_swapImage() { //v3.0
var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}
function MM_showHideLayers() { //v3.0
var i,p,v,obj,args=MM_showHideLayers.arguments;
for (i=0; i<(args.length-2); i+=3) if ((obj=MM_findObj(args[i]))!=null) { v=args[i+2];
if (obj.style) { obj=obj.style; v=(v=='show')?'visible':(v='hide')?'hidden':v; }
obj.visibility=v; }
}
//-->
</script>
</head>
<body text="#000000" bgColor="#ffffff" leftMargin="0" topMargin="0" onload="MM_preloadImages('images/kk2.gif')">
<!--#include file="title.asp"-->
<%set rsd=server.CreateObject("adodb.recordset")%>
<table class="shuang" cellSpacing="0" cellPadding="0" width="778" align="center" background="images/bg4.gif" border="0"><!--整体的大表格-->
<tbody>
<tr>
<td vAlign="bottom" width="193" height="23">
<table height="19" cellSpacing="0" cellPadding="0" width="180" align="center" background="images/bg2.gif" border="0">
<tbody>
<tr>
<td width="60" height="11"> </td>
<td vAlign="center" width="76" height="11">
<div class="zzz" align="center">中介公司搜索</div></td>
<td width="44" height="11"> </td></tr></tbody></table></td>
<td vAlign="center" width="13" rowSpan="5"> </td>
<td width="390" height="23" colspan="2" valign="center">
</td>
</tr>
<tr>
<td vAlign="top" width="193" rowSpan="2" height="452">
<table cellSpacing="0" cellPadding="0" width="100%" border="0">
<tbody>
<tr>
<td class="zzz" height="32">
<div align="center">
<form method="get" action="zjgs.asp" id="form1"><!--search-->
<table class="box1" height="40" cellSpacing="0" cellPadding="0" width="180" bgColor="#ffffff" border="0" align="center">
<tbody>
<tr>
<td width="180" bgColor="#000000" height="1"><img height="1" src width="1"></td></tr>
<tr>
<td width="180" background="images/bg3.gif" height="26" class="zzz">
<div align="center"><span class="zzz"></span></div>
<table class="box1" cellSpacing="0" cellPadding="0" width="95%" align="center" border="0">
<tr>
<td>
关键字:<input type="text" name="keyword" size="15">
<input type="hidden" name="dif" value="s">
</td>
</tr>
<tr>
<td width="100%" colspan="2"><div align="right"><p><input class="box1" type="submit" value="搜 索" name="b1"></td>
</tr>
</table>
</td></tr>
</tbody></table>
</div>
<div align="center"> </div></td></tr>
<tr>
<td>
</form>
</td></tr>
<table class="cellSpacing=0" cellPadding="0" width="180" border="00" align="center">
<tbody>
<tr><td>
<table cellSpacing="1" cellPadding="5" width="100%" align="center" bgColor="#003399" border="0">
<tr>
<td class="zzz" bgColor="#ffcc00"><b><font color="#003399" size="2"><p align="center">其他公司</font></b></td>
</tr>
<%
strsql="select top 38 uid,uname from tblmembers where commend='Y' and utype='M' order by uname"
rsd.Open strsql,conn
while not rsd.EOF
%>
<tr onmouseover="this.style.backgroundColor='#E6F2FF';" onmouseout="this.style.backgroundColor='#F9F7F2';" bgColor="#f9f7f2">
<td><a class="zzz" href="showmember.asp?uid=<%=rsd("uid")%>"><p align="center"><%=rsd("uname")%></a></td>
</tr>
<%
rsd.MoveNext
wend
rsd.Close
%>
</table>
</td></tr>
</tbody></table>
</td>
<td vAlign="top" width="572" colspan="2">
<%if trim(Request.QueryString("dif"))<>"s" then%>
<%
strsql="select * from tblmembers where uid='ycyc'"
rsd.Open strsql,conn
%>
<table class="box1" cellSpacing="0" cellPadding="2" width="550" border="0">
<tbody>
<tr>
<td width="100%"><table class="zzz" cellSpacing="0" cellPadding="0" width="100%" bgColor="#E6F2FF" border="0">
<tbody>
<tr>
<td class="zzz" width="70%"><font color="#999999"><table class="shuang" cellSpacing="0" cellPadding="0" width="550" align="center" background="images/bg4.gif" border="0">
<tr>
<td vAlign="top" width="550"><table cellSpacing="1" cellPadding="1" width="550" bgColor="#666666" border="0">
<tbody>
<tr>
<td class="zzz" bgColor="#ffcc66" width="74%" align="center" colspan="4">
<span style="font-family: 宋体; font-size: 12pt"><%=rsd("uname")%></span>
</td>
</tr>
<tr>
<td class="zzz" width="100%" bgColor="#EEEEEE" height="15" align="left" colspan="4">
<%=replace(rsd("intro"),chr(10),"<br>  ")%>
</td>
</tr>
<tr>
<td class="zzz" width="15%" bgColor="#EEEEEE" height="15" align="right">
联系人：
</td>
<td class="zzz" width="45%" bgColor="#EEEEEE" height="15" align="left">
<%=rsd("cman")%>
</td>
<td class="zzz" width="15%" bgColor="#EEEEEE" height="15" align="right">
电话：
</td>
<td class="zzz" width="25%" bgColor="#EEEEEE" height="15" align="left">
<%=rsd("tel")%>
</td>
</tr>
<tr>
<td class="zzz" width="15%" bgColor="#EEEEEE" height="15" align="right">
公司地址：
</td>
<td class="zzz" width="45%" bgColor="#EEEEEE" height="15" align="left">
<%=rsd("address")%>
</td>
<td class="zzz" width="15%" bgColor="#EEEEEE" height="15" align="right">
传真：
</td>
<td class="zzz" width="25%" bgColor="#EEEEEE" height="15" align="left">
<%=rsd("fax")%>
</td>
</tr>
</tbody>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
<br>
<%rsd.Close%>
<%end if%>
<br>
<%
strsql="select top 4 hid,district,houseaddress,hall,room,areadis,area,price from tbllease se join tblmembers mem on se.uid=mem.uid where se.uid='ycyc' order by hid desc"
rsd.Open strsql,conn
if not(rsd.EOF and rsd.BOF) then
%>
<table class="box1" cellSpacing="0" cellPadding="2" width="550" border="0">
<tr>
<td width="100%"><table class="zzz" cellSpacing="0" cellPadding="0" width="100%" bgColor="#E6F2FF" border="0">
<tbody>
<tr>
<td class="zzz" width="70%"><font color="#999999">
<table class="shuang" cellSpacing="0" cellPadding="0" width="550" align="center" background="images/bg4.gif" border="0">
<tr>
<td vAlign="top" width="550"><table cellSpacing="1" cellPadding="1" width="550" bgColor="#666666" border="0">
<tbody>
<tr>
<td class="zzz" bgcolor="#FED564" width="74%" align="center">出 租 房 信 息</td>
</tr>
<tr>
<td class="zzz" width="99%" bgColor="#EEEEEE" height="60" align="left">
<table cellSpacing="1" cellPadding="1" width="550" bgColor="#666666" border="0">
<tbody>
<%do until rsd.EOF%>
<tr bgColor="#ffffff">
<td class="zzz" width="100%" height="17"><a href="showlhouse.asp?hid=<%=rsd("hid")%>"><%=showdistrict(rsd("district"))%> <%=rsd("houseaddress")%> <%=rsd("room")%>室<%=rsd("hall")%>厅 <%=rsd("areadis")%> <%=rsd("area")%>M<sup>2</sup> <%=formatnumber(rsd("price"),0)%>元/月</a></td>
</tr>
<%
rsd.MoveNext
if rsd.EOF then
exit do
end if
%>
<tr>
<td class="zzz" width="100%" bgColor="#eeeeee" height="17"><a href="showslhouse.asp?hid=<%=rsd("hid")%>"><%=showdistrict(rsd("district"))%> <%=rsd("houseaddress")%> <%=rsd("room")%>室<%=rsd("hall")%>厅 <%=rsd("areadis")%> <%=rsd("area")%>M<sup>2</sup> <%=formatnumber(rsd("price"),0)%>元/月</a></td>
</tr>
<%rsd.MoveNext
loop
%>
<tr bgColor="#ffffff">
<td class="zzz" width="100%" height="17" align="right"><a href="leasehouse.asp?uid=<%=uid%>"><img src="images/more.gif" border="0">更多出租房</a></td>
</tr>
</tbody>
</table>
</td>
</tr>
</tbody>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
<%
rsd.Close
else
rsd.Close
end if
%>
<br>
<%
strsql="select top 4 hid,district,houseaddress,hall,room,areadis,area,price from tblsecondhouse se join tblmembers mem on se.uid=mem.uid where se.uid='ycyc' order by hid desc"
rsd.Open strsql,conn
if not(rsd.EOF and rsd.BOF) then
%>
<table class="box1" cellSpacing="0" cellPadding="2" width="550" border="0">
<tr>
<td width="100%"><table class="zzz" cellSpacing="0" cellPadding="0" width="100%" bgColor="#E6F2FF" border="0">
<tbody>
<tr>
<td class="zzz" width="70%"><font color="#999999">
<table class="shuang" cellSpacing="0" cellPadding="0" width="550" align="center" background="images/bg4.gif" border="0">
<tr>
<td vAlign="top" width="550"><table cellSpacing="1" cellPadding="1" width="550" bgColor="#666666" border="0">
<tbody>
<tr>
<td class="zzz" bgcolor="#FEB23F" width="74%" align="center">二 手 房 信 息</td>
</tr>
<tr>
<td class="zzz" width="99%" bgColor="#EEEEEE" height="60" align="left">
<table cellSpacing="1" cellPadding="1" width="550" bgColor="#666666" border="0">
<tbody>
<%do until rsd.EOF%>
<tr bgColor="#ffffff">
<td class="zzz" width="100%" height="17"><a href="showshouse.asp?hid=<%=rsd("hid")%>"><%=showdistrict(rsd("district"))%> <%=rsd("houseaddress")%> <%=rsd("room")%>室<%=rsd("hall")%>厅 <%=rsd("areadis")%> <%=rsd("area")%>M<sup>2</sup> <%=formatnumber(rsd("price"),0)%>元/套</a></td>
</tr>
<%
rsd.MoveNext
if rsd.EOF then
exit do
end if
%>
<tr>
<td class="zzz" width="100%" bgColor="#eeeeee" height="17"><a href="showshouse.asp?hid=<%=rsd("hid")%>"><%=showdistrict(rsd("district"))%> <%=rsd("houseaddress")%> <%=rsd("room")%>室<%=rsd("hall")%>厅 <%=rsd("areadis")%> <%=rsd("area")%>M<sup>2</sup> <%=formatnumber(rsd("price"),0)%>元/套</a></td>
</tr>
<%rsd.MoveNext
loop
%>
<tr bgColor="#ffffff">
<td class="zzz" width="100%" height="17" align="right"><a href="secondhouse.asp?uid=<%=uid%>"><img src="images/more.gif" border="0">更多二手房</a></td>
</tr>
</tbody>
</table>
</td>
</tr>
</tbody>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
<%
rsd.Close
else
rsd.Close
end if
%>
<br>
</td>
</tr>
</table></td></tr></tbody></table>
<!--#include file="footer.asp"--></body></html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -