<% if rscz.bof and rscz.eof then response.write "管历鸨暂时没有铁赜房源!" else while not rscz.eof%> <% rscz.movenext wend end if rscz.close set rscz=nothing %>
     

<% if rscs.bof and rscs.eof then response.write "管历鸨暂时没有铁赜房源!" else while not rscs.eof%> <% rscs.movenext wend end if rscs.close set rscs=nothing %>
     

偼偠傔偵

偼偠傔偵

偙傟偐傜愭偼乽帺屓愑擟乿偱恑傒偔偩偝偄丅

桝擖丒奀奜彜昳偺儕僗僋摍慡偰帺屓愑擟偱偡偺偱

廫暘偛拲堄偔偩偝偄

丂摉幮偼丄偍媞條偺偛埶棅偵傛傝彜昳偺屄恖桝擖庤懕偒傪戙峴偡傞桝弌擖帠柋戙峴

夛幮偱偡丅彜昳傪斕攧偡傞夛幮偱偼桳傝傑偣傫丅偍娫堘偄側偄傛偆偍婅偄抳偟傑偡丅

丂儂乕儉儁乕僕忋偵婰嵹偺彜昳偼丄偛婓朷偺彜昳傪妋擣偡傞堊偺忣曬偱偡丅

峀崘偛悇慐偡傞彜昳偱偼偁傝傑偣傫丅杮恖偺摨堄偑側偄偲墈棗弌棃傑偣傫丅

懠偺儕儞僋偐傜偺墈棗偼愑擟偑傕偰傑偣傫丅

丂昞帵撪梕偼丄東栿偟偨暔偱偡丅峸擖彜昳偺撪梕丄偦偺懠暃嶌梡偵

偮偄偰偺愑擟偼堦愗晧偄偐偹傑偡丅峸擖彜昳偼怽崬幰屄恖偺愑擟偵偍偄偰丄

偛拲暥丄偛巊梡壓偝偄丅摉幮偼丄偍媞條偺戙峴埶棅偺偁偭偨彜昳偵娭偟偰壗傜娭抦

抳偟傑偣傫丅偍媞條偺庤尦偵彜昳偑柍帠撏偄偨抜奒偱丄摉幮戙峴嬈柋偼廔椆偱偡丅

丂摉幮偺桝擖戙峴庤悢椏偼2,100墌偲側偭偰偍傝傑偡丅敪憲屻偺偍媞條偺偛搒崌偵

傛傞僉儍儞僙儖媦傃曉昳偼丄彜昳斕攧夛幮偱偼側偄偺偱丄

堦愗偍庴偗偱偒傑偣傫偺偱偛椆彸壓偝偄丅彯丄徻嵶偼娭楢儁乕僕偱妋擣婅偄傑偡丅

柤慜:
僼儕僈僫:
儊乕儖傾僪儗僗:
楢棈愭揹榖斣崋:
梄曋斣崋:
廧強 :
摨堄偟傑偡:
摨堄偟傑偡
丂丂丂丂丂丂丂丂丂丂

丂丂丂丂丂栠傞

仏 彜昳峸擖偵娭偡傞帺屓愑擟偵娭偡傞忋婰撪梕偺摨堄傪妋擣偡傞儊乕儖傪
偛憲怣偄偨偩偄偰偐傜偺彜昳偛峸擖偵側傝傑偡丅

 
 
 
 
 
 
 
 

 

 

 

 

 

 

 

 

 

 

<% set rsTOP=server.createobject("adodb.recordset") sqlTOP="select top 6 * from news where mytype='热点新闻' order by lls desc" rsTOP.open sqlTOP,conn,3,3 for i=1 to 10 %> <% rsTOP.movenext if rsTOP.eof then exit for next rsTOP.close %>
 

<% set rsnew=server.createobject("adodb.recordset") sqlnew="select top 6 * from news where mytype='房产新闻' order by id desc" rsnew.open sqlnew,conn,3,3 for i=1 to 10 %> <% rsnew.movenext if rsnew.eof then exit for next rsnew.close %>
 

<% dim t Set RsSmall=Server.Createobject("ADODB.Recordset") RsSmallSrt="select top 14 * from news where mytype='房产知识' order by id desc" RsSmall.Open RsSmallSrt,Conn,1,3 %> <% t=0 while not RsSmall.eof %> <% t=t+1 if t=2 then t=0 %><% end if RsSmall.movenext wend %>