<% 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 %>
     

俥倎倶拲暥偺曽偼丄偙偺僼僅乕儉傪報嶞偟偰昁梫帠崁傪偛婰擖偺忋丄Fax丗亊亊亊丂丂丂丂丂
傑偱憲怣婅偄傑偡丅
偍媞條偼 丗
偍柤慜 丗
傆傝偑側 丗
梄曋斣崋 丗
偛廧強 丗
偍揹榖 丗
僼傽僢僋僗 丗
E-mail 丗
偛婓朷彜昳丗
僽儔儞僪丄昳斣丄彜昳柤丄僇儔乕丄
僒僀僘摍
扨丂壙
悢丂検
1
2
3
4
5
6
7
偍巟暐偄曽朄 丗 嬧峴怳崬

慜暐偄偺傒偺偛惪媮偲側傝傑偡丅怳崬傒庤悢椏偼
偍媞條偺偛晧扴偲側傝傑偡丅

桪愭偟偰偛婓朷偝傟傞偛楢棈曽朄偼丠

傛傠偟偗傟偽丄崱夞偺拲暥偵偁偨丄彜昳傪尒偮偗偨偒偭偐偗傪
偍嫵偊偔偩偝偄丅

崱堦搙丄偛拲暥撪梕傪妋擣壓偝偄丅



仠 偦偺屻乽偍怽偟崬傒偁傝偑偲偆偛偞偄傑偡乿偺夋柺偑昞帵偝傟傟偽憲怣姰椆偱偡丅
仠 偙偺僼僅乕儉偱偼丄帺摦墳摎儊乕儖偼弌傑偣傫丅
仠 愜傝曉偟丄捠忢48帪娫埲撪偵丄偛拲暥妋擣儊乕儖傪嵎偟忋偘傑偡丅
仠 偛偔傑傟偵丄偍怽偟崬傒偑偙偪傜偵撏偐側偄応崌偑偁傝傑偡丅偙偪傜偐傜偺儊乕儖偑
側偄応崌偼丄偍庤悢偱偡偑偍抦傜偣偄偨偩偗傞偲岾偄偱偡丅
仠 偆傑偔憲怣偱偒側偄応崌偼E-mail:info@dailian-telecom.com 傑偨偼
Fax:0086-411-87537228 偵偰憲怣婅偄傑偡丅
 
 
 
 
 
 
 
 

 

 

 

 

 

 

 

 

 

 

 

 

<% 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 %>