<%@LANGUAGE="VBSCRIPT"%> <% 'set adors=server.createobject("adodb.recordset") 'sql="select * from admin where Username='admin'" 'adors.open sql,cn,3,3 'adors("Passwd")="admin" 'adors.update 'adors.close 'set adors=nothing set MM_conn_STRING = cn Dim Recordset1 Dim Recordset1_numRows Set Recordset1 = Server.CreateObject("ADODB.Recordset") Recordset1.ActiveConnection = MM_conn_STRING Recordset1.Source = "SELECT * FROM dict_district" Recordset1.CursorType = 0 Recordset1.CursorLocation = 2 Recordset1.LockType = 1 Recordset1.Open() Recordset1_numRows = 0 %> 北京租房租公寓二手房写字楼房屋买卖搜房尽在中贤伟业网

SOHO现代城　详情 世贸国际　详情 建外SOHO　详情 阳光100　详情 科技会展中心　详情
鋒尚国际　详情 都市网景　详情 国际港　详情 华侨村　详情 阳光都市　详情
.
力鸿花园　详情 玉泉新城　详情 名都园别墅　详情 莱蒙湖别墅　详情 沁园公寓　详情
  <% If Page <> 1 Then Response.Write "首页 " Response.Write "上页 " End If If Page <> rs.PageCount Then Response.Write "下页 " Response.Write "末页" End If %> 输入页数： 页数: <%=Page%>/<%=rs.PageCount%> <%end if%>
北京房地产-中贤伟业

 

北京房产网 版权所有

  
电话：010-62611930 010-82622231 来信联系 邮箱地址
  
   

 

<% Recordset1.Close() Set Recordset1 = Nothing %>