📄 building_dir.asp
字号:
<P align=left> · <A
href="calc/calc_5.asp">按揭计算</A></P></TD></TR>
<TR>
<TD align=middle width="100%" height=24>
<P align=left> · <A
href="calc/calc_6.asp">还贷计算</A></P></TD></TR>
<TR>
<TD align=middle width="100%" height=24>
<P align=left> · <A
href="calc/calc_7.asp">购房退税额</A></P></TD></TR>
<TR>
<TD align=middle width="100%" height=24>
<P align=left> · <A
href="calc/calc_8.asp">购房费用</A></P></TD></TR>
<TR>
<TD align=middle width="100%" height=24>
<P align=left> · <A
href="calc/calc_9.asp">各类贷款利率</A></P></TD></TR></TBODY></TABLE></TD></TR>
<TR>
<TD align=middle height=24><IMG height=24
src="images/dkjs_x.gif"
width=186></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></TD>
<TD vAlign=top align=middle>
<TABLE id=Table1 cellSpacing=0 cellPadding=0 align=center border=0>
<TBODY>
<TR>
<TD style="BACKGROUND-REPEAT: no-repeat" vAlign=center align=middle
background=images/newh_021.jpg Documents/安乐窝1.files/newh_021.jpg bgColor=#ccebcc
height=159><BR>
<BR>
<TABLE id=Table2 cellSpacing=1 cellPadding=0 width="100%"
border=0><TBODY>
<TR align=middle>
<TD><IFRAME frameBorder=0 height=100 marginHeight=1
marginWidth=1 scrolling=no src="scroll_view/scroll_view.htm"
width="98%" name="t1"></IFRAME></TD></TR></TBODY></TABLE></TD></TR>
<TR>
<TD vAlign=center></TD></TR>
<TR>
<TD vAlign=top align=middle>
<TABLE style="BORDER-COLLAPSE: collapse" borderColor=#b2b2b2
cellSpacing=0 cellPadding=0 width=530 border=0>
<TBODY>
<TR>
<TD width=530
height=20 align=center bgColor=#f7f7f7>
<%
set rs=server.createobject("adodb.recordset")
sql= "SELECT * FROM building order by ID Desc "
rs.open sql,conn,1,1
if rs.eof and rs.bof then %>
<p><font color="#FF0000">还没有商品房信息！</font></p>
<% else %>
</TD>
</TR>
<TR>
<TD align=right background=images/newh_033.jpg
height=30>
<%
rs.pagesize=20
totalPut=rs.recordcount '记录总数
totalPage=rs.pagecount
MaxPerPage=rs.pagesize
if currentpage<1 then
currentpage=1
end if
if currentpage>totalPage then
currentpage=totalPage
end if
if currentPage=1 then
showpages
showContent
showpages1
else
if (currentPage-1)*MaxPerPage<totalPut then
rs.move (currentPage-1)*MaxPerPage
dim bookmark
bookmark=rs.bookmark '移动到开始显示的记录位置
showpages
showContent
showpages1
else
end if
end if
rs.close
end if
set rs=nothing
conn.close
set conn=nothing
sub showContent
dim i,j
%>
<b><font color="#006699">服务专线：</font><font color="#FF0000"><%= tel %></font>
</b> </TD>
</TR>
<TR>
<TD
style="BORDER-TOP-WIDTH: 1px; BORDER-RIGHT: 1px solid; BORDER-LEFT: 1px solid; BORDER-BOTTOM: 1px solid"
vAlign=top align=middle><TABLE border=0 cellPadding=3 cellSpacing=1 width="528" bordercolorlight="#FFFFFF" bordercolordark="#FFFFFF" style="border-collapse: collapse" bordercolor="#111111">
<TBODY>
<TR align=middle bgColor=#ddeede>
<TD bgColor=#ddeede height=20 width="76"><STRONG><FONT
color=#333333>区域</FONT></STRONG></TD>
<TD bgColor=#ddeede width="140"><STRONG><FONT
color=#333333>地段</FONT></STRONG></TD>
<TD width="55"><STRONG><FONT color=#333333>设计用途</FONT></STRONG></TD>
<TD width="92"><STRONG><FONT color=#333333>信息价</FONT></STRONG></TD>
<TD width="135"> <P><STRONG>开发单位</STRONG></P></TD>
</TR>
<% i=1
do while not (rs.eof or err)%>
<TR align=middle bgColor=#ffffff>
<TD width="76" bgcolor="#F5FAF5"><span style="font-size:9pt">
<font color="#003399"><%= rs("qushu") %></font></span></TD>
<TD height=22 width="140" bgcolor="#F5FAF5"><span style="font-size:9pt">
<a href="javascript:fc('building_list.asp?id=<%=rs("id")%>')"><font color="#0000FF"><%= rs("name") %></font></a></span></TD>
<TD width="55" bgcolor="#F5FAF5"><span style="font-size:9pt">
<font color="#003399"> <%= rs("cjyt") %></font></span></TD>
<TD width="92" bgcolor="#F5FAF5"><span style="font-size:9pt">
<font color="#003399"> <%= rs("price") %></font></span></TD>
<TD width="135" bgcolor="#F5FAF5"><span style="font-size:9pt">
<font color="#003399"> <%= rs("who") %></font></span></TD>
</TR>
<%
if i>=MaxPerPage then exit do '循环时如果到尾部则先退出，如果记录达到页最大显示数，也退出
i=i+1
rs.movenext
loop
%>
<TR align=middle bgColor=#ffffff>
<TD colSpan=5 height=22 width="522"> <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber1">
<tr>
<td width="100%">
<%end sub %>
<%
dim n
n=totalPage
%>
<form action="building_dir.asp" method="GET" align="right">
</form>
<div align="center">
<center>
<table width="108%" height="30" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="100%" height="30" bgcolor="#F5FAF5">
<p align="center"><span style="font-size:9pt">
共<font color="#FF0000"><%=totalPage%></font>页/<font color="red"><%=totalPut%></font>条商品房信息</span>
<% If currentPage <> 1 Then %>
<A href=building_dir.asp><font color="#FF6600"><span style="font-size:9pt">
[首页]</span></font></A> <A href=building_dir.asp?Page=<%= (currentPage-1) %> ><font color="#FF6600"><span style="font-size:9pt">
[上一页]</span></font></A>
<% End If %>
<% If currentPage <> rs.PageCount Then %>
<A href=building_dir.asp?Page=<%= (currentPage+1) %> ><font color="#FF6600"><span style="font-size:9pt">
[下一页]</span></font></A> <A href=building_dir.asp?Page=<%= totalPage %>><font color="#FF6600"><span style="font-size:9pt">
[尾页]</span></font></A>
<% End If %>
<span style="font-size:9pt">第<font color="#FF0000"><%=currentPage%></font>页/共<font color="#FF0000"><%=totalPage%></font>页
<% response.write " 转到：<select name='page' size=1 class=smallselsect style='font-family: 宋体; font-size: 9pt;'>"
for i=1 to n
response.write "<option value="& i
if currentpage=i then
response.write " selected"
end if
response.write ">"& i &"</option>"
next
response.write "</select>"
response.write " <input class=buttonface type='submit' value='go' style='font-family: 宋体; font-size: 9pt;'>"
%>
<%
rs.close
set rs=nothing
%>
</span></td>
</tr>
</table>
</center>
</div></td>
</tr>
</table></TD>
</TR>
</TBODY>
</TABLE> </TD>
</TR></TBODY></TABLE></TD></TR>
<TR>
<TD align=middle></TD></TR>
<TR>
<TD align=middle></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
<META http-equiv=Content-Language content=zh-cn>
<STYLE type=text/css>.font12 {
FONT-SIZE: 12px; LINE-HEIGHT: 15px
}
</STYLE>
<!--#include file=inc/bottom.asp --></BODY></HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -