<%=rs("company")%>楼盘介绍-武鸣房产网-武鸣信息网

<%on error resume next%> <% dim messageCheck id=Replace_Text(request("id")) if isInt(id)="" then Response.Write "" response.end end if sql="select * from comp where icheck=True and id=" & id Set rs=Server.CreateObject("ADODB.RecordSet") rs.open sql,conn,1,1 messageCheck=rs("messageCheck") if rs.bof or eof then Response.Write "" response.end end if '取bigtrade、id值用于投票功能(bigtrade是企业所在的一级行业分类) bigtrade=rs("bigtrade") company=rs("company") compid=rs("id") %> <% dim strSql,rs,i,PageNo strSql="select * from comp where icheck=True and id=" & request("id") set rs=Server.CreateObject("ADODB.RecordSet") rs.open strSql,conn,3,3 rs("click")=rs("click")+1 rs.update %> <%=rs("company")%>楼盘介绍-武鸣房产网-武鸣信息网

您现在的位置是：首页> 楼盘><%=rs("company")%>

<%=rs("company")%>楼盘简介

<%if messageCheck=1 then%> <%end if%> <% if rs("lpvideoad")<>"" then%> <% if left(rs("lpvideoad"),7)="http://" then%> <%else%> <%end if%> <%end if%>

" class="menu01">楼盘简介

" target="_blank" class="font_menu">楼盘视频

团购预定

" target="_blank">

" width="250" height="200" border="0" />

<%=rs("company")%>效果图(点击可放大)

楼盘名称：

<%=rs("company")%>

浏览次数：

<%=rs("click")%>次

销售情况：

<%=rs("xkz")%>

所在区域：

<%=rs("city")%>

楼盘类别：

<%=rs("leibie")%>

总户数：

<%=rs("postcode")%>户

占地面积：

<%=rs("zdmj")%>平方米

建筑面积：

<%=rs("jzmj")%>平方米

开盘时间：

<%=rs("kptime")%>

交房时间：

<%=rs("rzdate")%>

绿化率：

<%=rs("lhl") %> % 什么是绿化率?

容积率：

<%=rs("rjl")%> 什么是容积率?

车库车位：

<%=rs("cw")%>

楼盘网站：

<%if rs("url")="没有网站" then%> <%=rs("url")%> <%elseif left(rs("url"),7)="http://" then%> " target="_blank"><%=rs("url")%> <%else%> " target="_blank"><%=rs("url")%> <%end if%>

物业公司：

<%=rs("wygl")%> <%if rs("wyglweb")<>"" then%> <%if left(rs("wyglweb"),7)="http://" then%> " target="_blank">[详情] <%else%> " target="_blank">[详情] <%end if%> <%end if%>

开发商：

<%=rs("kfs")%> <%if rs("kfsweb")<>"" and rs("kfsweb")<>"没有网站" then%> <%if left(rs("kfsweb"),7)="http://" then%> " target="_blank">[详情] <%else%> " target="_blank">[详情] <%end if%> <%end if%>

售楼处：

<%=rs("xsaddress")%>

项目地址：

<%=rs("address")%>

公交车：

<%=rs("gjxl")%>

预售证：

<%=rs("ysz")%>

咨询热线：

<%=rs("tel")%>(提及武鸣信息网—房产频道，将获得更多便利服务)

<%end if%>

<%=rs("intro")%>

免责声明：本信息仅供参考，相关数据及销售细节开发商保留最终解释权，详情致电：<%=rs("tel")%>

历史价格	单位：元/平方米

<% compid=replace(request("id"),"'","’") set rst2=server.createobject("adodb.recordset") sqlt2="select * from price where compid='"&compid&"' ORDER BY ID DESC" rst2.open sqlt2,conn,1,1 j=1 %> <% do while not rst2.eof %> <%if j mod 2 = 0 then%> <% end if rst2.movenext j=j+1 loop rst2.close set rst2=nothing %>

更新时间	起价	均价	最高价	备注
<%=rst2("jdate")%>	<%=rst2("qprice")%>	<%=rst2("jprice")%>	<%=rst2("gprice")%>	<%=rst2("jgbz")%>

楼盘投票

<% sql3="select * from review " set rs3=server.createobject("ADODB.Recordset") rs3.open sql3,conn,1,1 votenum=rs3.recordcount for i=1 to rs3.recordcount %> <% rs3.movenext next rs3.close set rs3=nothing %>

您觉得本楼盘什么地方好
" />	<%=rs3("review")%>

<% sql4="select * from vote where compid='"&id&"'" set rs4=server.createobject("ADODB.Recordset") rs4.open sql4,conn,1,1 total=rs4("a")+rs4("b")+rs4("c")+rs4("d")+rs4("e")+rs4("f")+rs4("g") a=(rs4("a")/total)*100 b=(rs4("b")/total)*100 c=(rs4("c")/total)*100 d=(rs4("d")/total)*100 e=(rs4("e")/total)*100 f=(rs4("f")/total)*100 g=(rs4("g")/total)*100 %> <%if votenum>4 then%> <%end if%> <%if votenum>5 then%> <%end if%> <%if votenum>6 then%> <%end if%> <% rs4.close set rs4=nothing %>

现在投票情况如下
A、		<%=rs4("a")%> 票
B、		<%=rs4("b")%> 票
C、		<%=rs4("c")%> 票
D、		<%=rs4("d")%> 票
E、		<%=rs4("e")%> 票
F、		<%=rs4("f")%> 票
G、		<%=rs4("g")%> 票
最后更新时间：<%=rs4("ltime")%>

团购预订

<%if messageCheck=1 then%>

楼盘评论

<% sql5="select top 8 * from message where compid='"&id&"' order by id desc" Set rs5=Server.CreateObject("ADODB.RecordSet") rs5.Open sql5,conn,1,1 do while not rs5.eof m_id=rs5("ID") lzuser=rs5("user") %> <% rs5.movenext loop rs5.close set rs5=nothing %>

<%=rs5("user")%> 发表评论

<% dim rs_R,sql_R Set rs_R=Server.CreateObject("ADODB.RecordSet") sql_R="SELECT ID,user,mdate,Rcontent,IsAdminReply from Reply_message where message_id="&m_id&" order by ID desc" rs_R.open sql_R,conn,1,1 do while not rs_R.eof user = rs_R("user") mdate = rs_R("mdate") Rcontent = rs_R("Rcontent") IsAdminReply = rs_R("IsAdminReply") if IsAdminReply = 1 then user = "" & user & "" else user = "" & user & "" end if %> <% rs_R.movenext loop rs_R.close set rs_R=nothing %>

<%=UBBCode(left(rs5("mcontent"),200))%>

留言时间：<%=rs5("mdate")%>来自：<% A=rs5("userip") IP=split(A, ".")%><%=IP(0)%>.<%=IP(1)%>.<%=IP(2)%>.*

写留言

">回复留言

<%=user%> 回复 <%=lzuser%> 留言回复时间<%=mdate%>

<%=UBBCode(Rcontent)%>

查看更多留言>>>

留言参与楼盘评论：

昵称：

输入验证码:

" />

留言板声明：
1、此留言代表网友观点，不代表武鸣信息网观点，本网只提供交流平台;
2、您要为您发表的言论后果负责，请各位遵守法纪注意语言文明;
3、栏目只为大家提供基础信息，如果有不雅留言我们将进行删除;

<%if rs("flashad2")<>"" then%>

" target="_blank">

" border="0">

<%else%>

<%end if%>

在售楼盘

<% set rst1=server.createobject("adodb.recordset") sqlt1="SELECT * FROM comp where icheck=True and xkz like"&"'%销%中%'"&" order by id desc" rst1.open sqlt1,conn,1,1 j=1 %> <% do while not rst1.eof %> <%if j mod 2 = 0 then%> <% end if rst1.movenext j=j+1 loop rst1.close set rst1=nothing %>

·" title="<%=rst1("company")%>" target="_blank"><%=(left(rst1("company"),8))%>