|
|
|
 |
房产知识 |
|
|
|
<% dim t
Set RsSmall=Server.Createobject("ADODB.Recordset")
RsSmallSrt="select top 29 * 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 %>
|
|
|
| 信息标题 |
资金方式 |
所在地 |
区域 |
额度 |
<% set rscz=conn.execute("select top 7 * from house where mytype='贷款供应 ' order by id desc")%>
<% if rscz.bof and rscz.eof then
response.write "管理员暂时没有添加!"
else
while not rscz.eof%>
| ">
<% =left(rscz("fw_dizhi"),12) %>
|
<% =rscz("fw_jiegou") %> |
<% =rscz("fw_zhuangxiu") %>
|
<% =rscz("fw_quyu") %> |
<% =rscz("fw_leixing") %> |
<%
rscz.movenext
wend
end if
rscz.close
set rscz=nothing
%>
| 信息标题 |
资金方式 |
所在地区 |
区域 |
额度 |
<% set rscz=conn.execute("select top 7 * from house where mytype='贷款需求 ' order by id desc")%>
<% if rscz.bof and rscz.eof then
response.write "管理员暂时没有添加信息!"
else
while not rscz.eof%>
| ">
<% =left(rscz("fw_dizhi"),12) %>
|
">
<% =left(rscz("fw_jiegou"),4) %>
|
<% =rscz("fw_zhuangxiu") %> |
<% =rscz("fw_quyu") %>
|
<% =rscz("fw_leixing") %>
|
<%
rscz.movenext
wend
end if
rscz.close
set rscz=nothing
%>
| 信息标题 |
资金方式 |
所在地区 |
区域 |
额度 |
<% set rscz=conn.execute("select top 7 * from house where mytype='项目融资 ' order by id desc")%>
<% if rscz.bof and rscz.eof then
response.write "管理员暂时没有添加信息!"
else
while not rscz.eof%>
| ">
<% =left(rscz("fw_dizhi"),12) %>
|
<% =rscz("fw_jiegou") %> |
<% =rscz("fw_zhuangxiu") %>
|
<% =rscz("fw_quyu") %> |
<% =rscz("fw_leixing") %> |
<%
rscz.movenext
wend
end if
rscz.close
set rscz=nothing
%>
| 信息标题 |
资金方式 |
所在地区 |
区域 |
额度 |
<% set rscz=conn.execute("select top 7 * from house where mytype='其它服务' order by id desc")%>
<% if rscz.bof and rscz.eof then
response.write "管理员暂时没有添加信息!"
else
while not rscz.eof%>
| ">
<% =left(rscz("fw_dizhi"),12) %>
|
<% =rscz("fw_jiegou") %> |
<% =rscz("fw_zhuangxiu") %>
|
<% =rscz("fw_quyu") %> |
<% =rscz("fw_leixing") %> |
<%
rscz.movenext
wend
end if
rscz.close
set rscz=nothing
%>
|
|
 |
热点新闻 |
|
|
|
|
|