?? czindex.asp
字號:
<!--#include file="conn.asp"-->
<!--#include file="css1.css"-->
<%
set rs=server.createobject("adodb.recordset")
sql=("select * from fangyuan where mytype='出租 ' order by id desc")'由大到小排序
rs.open sql,conn,1
rs.pagesize=15 '每頁顯示多少條
pagecount=rs.pagecount '總頁數(shù)
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>出 租 信 息</title>
</head>
<body>
<!--#include file="top.asp"-->
<TABLE width=777 border=0 align="center" cellPadding=0 cellSpacing=0>
<TBODY>
<TR>
<TD bgColor=#188eac width=1></TD>
<TD align=middle width=776> <TABLE border=0 cellPadding=0 cellSpacing=0 width=771>
<TBODY>
<TR align=middle vAlign=top>
<TD width=181 height="267">
<!--#include file="dlck.asp"-->
<p> </p>
<TABLE background=images/left_bg_1.gif border=0 cellPadding=0
cellSpacing=0 width="100%">
<TBODY>
<TR>
<TD><!--#include file="java.asp"--></TD>
</TR>
</TBODY>
</TABLE></TD>
<TD width=3><font size="2"> </font></TD>
<TD width=587><div align="left"> </div>
<div align="left">
<table width="575" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="582"><table width="572" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="459"><font size="2"><img src="images/tiao01.gif" width="194" height="26"><IMG src="images/tiao02.gif" width="26" height="26" border=0></font></td>
<td width="16"><img src="images/jiantou01.gif" width="16" height="14">
<a href="csfb.htm"></a></td>
<td width="97"><a href="fb.asp?lb=出租"><font color="#FF0000" size="2">發(fā)布出租信息</font></a></td>
</tr>
</table></td>
</tr>
<tr>
<td><table width="572" border="0" align="left" cellpadding="1" cellspacing="1" bordercolor="#CCCCCC" bgcolor="#999999">
<tr bordercolor="#CCCCCC" bgcolor="#D2D874">
<td width="41" valign="middle"><div align="center"><font size="2">
類別</font></div></td>
<td width="57" valign="middle"><div align="center"><font size="2">區(qū)域</font></div></td>
<td width="92" valign="middle"><div align="center"><font size="2">結(jié)構(gòu)</font></div></td>
<td width="54" valign="middle"><div align="center"><font size="2">價格</font></div></td>
<td width="186" valign="middle"><div align="center"><font size="2">地址</font></div></td>
<td width="81"> <div align="center"><font size="2">日期</font></div></td>
<td width="39"> <div align="center"><font size="2">詳細(xì)</font></div></td>
</tr>
<%
if rs.bof and rs.eof then
response.write "暫時沒有信息"
else
page=clng(request.querystring("page"))
if page<1 then page=1
if page>rs.pagecount then page=rs.pagecount
rs.absolutepage=page '跳到多少頁
for i=1 to rs.pagesize
%>
<tr bgcolor="#EFF1CF">
<td><div align="center"><font size="2">
<% =rs("mytype")%>
</font></div></td>
<td><div align="center"><font size="2">
<% =rs("fw_quyu")%>
</font></div></td>
<td><div align="center"><font size="2">
<% =rs("fw_jiegou")%>
</font></div></td>
<td><div align="center"><font size="2">
<% =rs("fw_jiage") %>
</font></div></td>
<td><div align="center"><font size="2">
<% =rs("fw_dizhi") %>
</font></div></td>
<td> <div align="center"><font size="2"><font size="2">
<% =rs("fw_fbri") %>
</font> </font></div></td>
<td> <div align="center"><font size="2"><a href="xxxx.asp?xiangxi=<% =rs("id") %>">查看</a></font></div></td>
</tr>
<%
rs.movenext
if rs.eof then exit for
next
end if
%>
</table>
<font size="2"><BR>
</font> <TABLE border=0 cellPadding=2 cellSpacing=2 width="100%">
</TABLE></td>
</tr>
<tr>
<td valign="bottom">
<div align="right">
<%
r=7
'總頁數(shù)
zys=round(clng(rs.pagecount)/r+0.5)
'當(dāng)前頁數(shù)
dqys=request.QueryString("dqys")
'開始頁
ksy=request.QueryString("ksy")
if dqys="" then dqys=1
if ksy="" then ksy=1
js=clng(dqys) * r '一個FOR語句結(jié)束
if js > clng(rs.pagecount) then js=clng(rs.pagecount)
newksy= clng(dqys)*r-(r-1) '一個FOR語句開始
if clng(dqys) >1 then response.write "<a href=?dqys="& dqys-1 &">" &"上一頁" &"</a>"
for t=newksy to js
response.write "<a href=?page=" &t&"&dqys="&dqys&">" &t& "</a> "
next
if cdbl(dqys)< zys then response.write "<a href=?dqys="& dqys+1 &">" &"下一頁" &"</a>"
'response.write zys
%>
</div></td>
</tr>
</table>
</div></TD>
</TR>
</TBODY>
</TABLE>
</TD>
<TD bgColor=#188eac width=1></TD>
</TR>
</TBODY>
</TABLE>
<!--#include file="let.asp"--></body>
</html>
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -