newhouse_detail2.asp
来自「房地产管理系统 vb写的,很不错!!!!!!!!!!!」· ASP 代码 · 共 297 行
ASP
297 行
<!--#include file="../inc/conn.asp"-->
<!--#include file="../inc/getPartStrAndBytesLen.asp" -->
<!--#include file="../inc/onlinecount.asp"-->
<!--#include file="../top.asp"-->
<%OpenDataConn
Hid=RtnReplaceInt(Trim(request("hId")),0)
Set Rs=Server.CreateObject("ADODB.Recordset")
Rs.Open"select * from newhouse where HID="&HID&"",conn,1,1
housename= Trim(Rs("HouseName"))
%>
<script src="../images/layerdetail.js"></script>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD><TITLE><%=housename%><%=homepage_title%></TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<script language="JavaScript" src="../inc/index.js"></script>
<LINK
href="../img/css.css" type=text/css rel=stylesheet>
<META content="MSHTML 6.00.3790.2706" name=GENERATOR></HEAD>
<BODY class=bg1 text=#000000 bgColor=#ffffff leftMargin=0 topMargin=1>
<TABLE height=28 cellSpacing=0 cellPadding=0 width=980 align=center
background=../img/headbg4.gif border=0>
<TBODY>
<TR>
<TD align=right width=35>
<IMG height=13 src="../img/headarrow.gif"
width=17></TD>
<TD align=middle width=10></TD>
<TD class=TD_Place width=935>您现在的位置：<a href="../index.asp"><font color="#FFFFFF"><%=homepage_title%> </FONT></a>
<font color="#FFFFFF">>> </FONT>
<font color="#FFFFFF">楼盘展示</font></TD></TR></TBODY></TABLE>
<TABLE height=7 cellSpacing=0 cellPadding=0 width=980 align=center
background=../img/headbg5.gif border=0>
<TBODY>
<TR>
<TD></TD></TR></TBODY></TABLE>
<TABLE height=497 cellSpacing=0 cellPadding=0 width=970 align=center border=0>
<TBODY>
<TR>
<TD vAlign=top width=259 height=733 rowspan="2">
<TABLE class=out3s_green height="100%" cellSpacing=0 cellPadding=0
width=255 bgColor=#7cb721 border=0>
<TBODY>
<TR>
<TD vAlign=top>
<TABLE cellSpacing=0 cellPadding=0 width="75%" align=center
border=0>
<TBODY>
<TR>
<TD colspan="2">
<p style="line-height: 22px">
<img border="0" src="../img/25.gif" width="252" height="41"></TD></TR>
<TR>
<form name="form1" method="get" action="newhouse_show.asp">
<tr>
<td width="25%" height="20" align="right"><font color=#ffffff>区域 </font></td>
<td width="75%" height="20"> <SPAN class=P9><FONT color=red>
<%
set rscyte=server.CreateObject("adodb.recordset")
sqlcyte= "select * from cyte"
rscyte.Open sqlcyte,conn,1,1
%>
<select name="fangwei" id="id" class="inp">
<option value="">-- 请选择 --</option>
<%do while not rscyte.eof%>
<option value="<%=rscyte("cyte")%>"><%=rscyte("cyte")%></option>
<%
rscyte.movenext
loop
rscyte.close
set rscyte=nothing
%>
</select>
</FONT></SPAN></td>
</tr>
<tr>
<td height="20" align="right"><font color=#ffffff>价格 </font></td>
<td height="20"> <input name="price1" type="text" id="price1" size="5">
<font color=#ffffff> - </font>
<input name="price2" type="text" id="price2" size="5">
<font color=#ffffff> 元</font> </td>
</tr>
<tr>
<td height="20" align="right"> <font color=#ffffff>楼盘 </font></td>
<td height="20"> <input name="HouseName" type="text" id="HouseName" size="14">
</td>
</tr>
<tr>
<td height="20" align="right" valign="bottom"><font color=#ffffff>开发商</font></td>
<td height="20" valign="bottom"> <input name="Developer" type="text" id="Developer" size="14">
</td>
</tr>
<tr>
<td height="20" colspan="2" valign="bottom">
<p align="center">
<a href="javascript:document.form1.submit();">
<img src="../images/frams_86.jpg" width="53" height="23" border="0"></a> </td>
</tr>
</form></TR>
<TR>
<TD colspan="2">
<p align="center">
<img border="0" src="../img/26.gif" width="252" height="41"></TD></TR>
<TR>
<TD colspan="2">
<table width="200" border="0" cellpadding="0" cellspacing="0" bgcolor="#7CB721">
<%
Set Rs2=Server.CreateObject("ADODB.Recordset")
sqlcyte1 = "select top 10 * from newhouse order by click desc"
rs2.Open sqlcyte1,conn,1,1
Do While Not Rs2.Eof
%>
<tr>
<td width="22" align="center">
<img border="0" src="../img/arr_w1.gif" width="9" height="9"></td>
<td width="100"><a href=newhouse_detail2.asp?HID=<%=Trim(Rs2("HID"))%>><font color=#ffffff><%=getStr(Trim(Rs2("housename")),7)%></a></font></td>
<td width="78"><font color="#FFFFFF"><%=Trim(Rs2("AvgPrice"))%>元/m<sup>2</sup></font></td>
</tr>
<%
Rs2.MoveNext
Loop
Rs2.Close
%>
</table>
</tr>
</table>
</TD></TR>
</table></td>
<TD vAlign=top width=711>
<table width="710" class=out4s_green border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td>
</td>
</tr>
<tr style="line-height:2px;">
<td>
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="160">
<img src="../images/arrow.gif" width="160" height="64"></td>
<td width="75"><div align="center"><a href=newhouse_wz.asp?HID=<%=Trim(Rs("HID"))%> newhouse>
<img src="../images/bt_1.gif" width="40" height="54" border="0"></a></div></td>
<td width="84"><div align="center"><a href=newhouse_xq.asp?HID=<%=Trim(Rs("HID"))%> newhouse>
<img src="../images/bt_2.gif" width="52" height="54" border="0"></a></div></td>
<td width="97"><div align="center"><a href=newhouse_sl.asp?HID=<%=Trim(Rs("HID"))%> newhouse>
<img src="../images/bt_3.gif" width="52" height="54" border="0"></a></div></td>
<td width="84"><div align="center"><a href=newhouse_fx.asp?HID=<%=Trim(Rs("HID"))%> newhouse>
<img src="../images/bt_4.gif" width="38" height="54" border="0"></a></div></td>
<td width="78"><a href=newhouse_detail2.asp?HID=<%=Trim(Rs("HID"))%> newhouse>
<img src="../images/icon_C02.gif" width="64" height="67" border="0"></a></td>
</tr>
</table></td>
</tr>
<tr>
<td height="16" align="center">
<table width="578" border="0" cellpadding="0" cellspacing="1" bgcolor="#FCEEC5">
<tr>
<td bgcolor="#FFFFFF">
<table width="705" border="0" cellpadding="0" cellspacing="1" bgcolor="#CDEECA">
<tr>
<td width="20%" height="25" align="center" bgcolor="#DCF3DA">楼盘名称：</td>
<td width="41%" height="25" bgcolor="#DCF3DA"> <%=housename%></td>
<td width="39%" rowspan="6" align="center" bgcolor="#FFFFFF">
<%
If isNull(Trim(Rs("simg"))) or Trim(Rs("simg"))="" Then
Response.Write("<table width=196 height=140 style='filter: Glow(Color=#F3BF21, Strength=2);border:#F3BF21 solid 1pt;'><tr><td align='center'>暂无图片</td></tr></table>")
Else
if rs("bimg")<>"" then
%>
<a href="../fyfile/<%=replace(Trim(Rs("bimg")),",","")%>" target="_blank"><img src="../fyfile/<%=replace(Trim(Rs("simg")),",","")%>" width="196" height="140" border="0"></a>
<%else%>
<%
Response.Write"<img src='../fyfile/"&replace(Trim(Rs("simg")),",","")&"' width='196' height='140'>"
end if
End If
%> </td>
</tr>
<tr>
<td width="20%" height="25" align="center" bgcolor="#FFFFFF">开
发 商：</td>
<td height="25" bgcolor="#FFFFFF"> <%=Trim(Rs("Developer"))%></td>
</tr>
<tr>
<td width="20%" height="25" align="center" bgcolor="#DCF3DA">所在区域：</td>
<td height="25" bgcolor="#DCF3DA"> <%=Trim(Rs("Area"))%></td>
</tr>
<tr>
<td width="20%" height="25" align="center" bgcolor="#FFFFFF">占地面积：</td>
<td height="25" bgcolor="#FFFFFF"> <%=Trim(Rs("mianji"))%> m<sup>2</sup></td>
</tr>
<tr>
<td width="20%" height="25" align="center" bgcolor="#DCF3DA">起 价：</td>
<td height="25" bgcolor="#DCF3DA"> <%=Trim(Rs("BeginPrice"))%> 元/m<sup>2</sup></td>
</tr>
<tr>
<td width="20%" height="25" align="center" bgcolor="#FFFFFF">均 价：</td>
<td height="25" bgcolor="#FFFFFF"> <%=Trim(Rs("AvgPrice"))%> 元/m<sup>2</sup></td>
</tr>
<tr>
<td height="25" align="center" bgcolor="#DCF3DA">详细地址：</td>
<td height="25" colspan="2" bgcolor="#DCF3DA"> <%=Trim(Rs("HouseAddress"))%></td>
</tr>
<tr>
<td height="25" align="center" bgcolor="#FFFFFF">绿 化 率：</td>
<td height="25" colspan="2" bgcolor="#FFFFFF"> <%=Trim(Rs("liuhua"))%></td>
</tr>
<tr>
<td height="25" align="center" bgcolor="#DCF3DA">容 积 率：</td>
<td height="25" colspan="2" bgcolor="#DCF3DA"> <%=Trim(Rs("rongji"))%></td>
</tr>
<tr>
<td height="25" align="center" bgcolor="#FFFFFF">物业公司：</td>
<td height="25" colspan="2" bgcolor="#FFFFFF"> <%=Trim(Rs("wuye"))%></td>
</tr>
<tr>
<td height="25" align="center" bgcolor="#DCF3DA">预 售 证：</td>
<td height="25" colspan="2" bgcolor="#DCF3DA"> <%=Trim(Rs("yusou"))%></td>
</tr>
<tr>
<td height="25" align="center" bgcolor="#FFFFFF">公交线路：</td>
<td height="25" colspan="2" bgcolor="#FFFFFF"> <%=Trim(Rs("BusLine"))%></td>
</tr>
<tr>
<td height="25" align="center" bgcolor="#DCF3DA">售楼地址：</td>
<td height="25" colspan="2" bgcolor="#DCF3DA"> <%=Trim(Rs("SellAddress"))%></td>
</tr>
<tr>
<td height="25" align="center" bgcolor="#FFFFFF">售楼热线：</td>
<td height="25" colspan="2" bgcolor="#FFFFFF"> <%=Trim(Rs("SellHotTel"))%></td>
</tr>
<tr>
<td height="25" align="center" bgcolor="#DCF3DA">联 系 人：</td>
<td height="25" colspan="2" bgcolor="#FFFFFF"> <table width="100%" height="25" border="1" cellpadding="0" cellspacing="0" bordercolor="#DCF3DA" bordercolordark="#DCF3DA" bgcolor="#DCF3DA" frame="void">
<tr>
<td width="40%"> <%=Trim(Rs("LinkMan"))%></td>
<td width="28%" align="center">传 真：</td>
<td width="31%"> <%=Trim(Rs("SellFax"))%></td>
</tr>
</table></td>
</tr>
<tr>
<td height="25" align="center" bgcolor="#FFFFFF">E－Mail：</td>
<td height="25" colspan="2" bgcolor="#FEFAEE">
<table width="100%" height="25" border="0" cellpadding="0" cellspacing="0" frame="void">
<tr bgcolor="#FFFFFF">
<td width="41%"> <%=Trim(Rs("Email"))%></td>
<td width="28%" align="center">网 址：</td>
<td width="31%"> <a href="<%=Trim(Rs("Web"))%>"><%=Trim(Rs("Web"))%></a></td>
</tr>
</table></td>
</tr>
<tr bgcolor="#DCF3DA">
<td height="25" align="center">交通状况：</td>
<td height="25" colspan="2"> <%=Trim(Rs("TrafficStatus"))%></td>
</tr>
<tr bgcolor="#FFFFFF">
<td height="25" align="center">楼盘简介：</td>
<td height="25" colspan="2">
<table width="94%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><script type="text/javascript"><!--
google_ad_client = "pub-1643874477780591";
google_ad_width = 468;
google_ad_height = 60;
google_ad_format = "468x60_as";
google_ad_type = "text_image";
google_ad_channel = "";
//--></script>
<script type="text/javascript"
src="http://pagead2.googlesyndication.com/pagead/show_ads.js">
</script></td>
</tr>
<tr>
<td><div style="line-height:20px;"><%=Trim(Rs("jianjie"))%></div></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table>
</td>
</tr>
</table>
</TD></TR>
</TBODY></TABLE></TD></TR></TBODY></TABLE></TD>
<TD vAlign=top>
<TABLE cellSpacing=0 cellPadding=0 border=0>
<TBODY>
<TR>
<TD height=5></TD></TR></TBODY></TABLE>
<TABLE height=3 cellSpacing=0 cellPadding=0 width=75 border=0>
<TBODY>
<TR>
<TD></TD></TR></TBODY></TABLE>
<!--#include file="../end.asp"-->
</BODY></HTML>⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?