?? admin_qiuzu.asp
字號:
<!--#include file=../conn/adodb1.asp -->
<%
if session("cjuser")="" and session("pwdd")="" then
response.write"<SCRIPT language=JavaScript>alert('你沒有登錄，無權進入！');"
response.write"this.location.href='error.htm';</SCRIPT>"
response.end
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="css/main.css" rel="stylesheet" type="text/css">
</head>
<body link="#000000" vlink="#000000">
<%
dim sql,rs
set rs=server.CreateObject("adodb.recordset")
sql="select * from qiuzu order by fbsj desc"
session("sql")=sql
rs.open sql,db,1,1
if rs.recordcount >0 then
dim page_no '定義當前是第幾頁
if request.querystring("page_no")="" then
page_no=1
else
page_no=cint(request.querystring("page_no"))
end if
rs.pagesize=18
rs.absolutepage=page_no
%>
<table width="100%" border="0" align="center" cellspacing="0">
<tr >
<td height="10" align="center">
<table width="100%" border="0" cellpadding="0" cellspacing="1" >
<tr >
<td colspan="10"><table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr class="xiangxi">
<td>求租信息</td>
</tr>
</table></td>
</tr>
<tr >
<td align="center" class="fenlei"><strong>房源編碼</strong></td>
<td align="center" class="fenlei"><strong>房源類別</strong></td>
<td align="center" class="fenlei" ><strong>區域</strong></td>
<td align="center" class="fenlei"><strong>結構</strong></td>
<td align="center" class="fenlei"><strong>樓層</strong></td>
<td align="center" class="fenlei"><strong>價格</strong></td>
<td align="center" class="fenlei"><strong>地址</strong></td>
<td align="center" class="fenlei"><strong>發布時間</strong></td>
<td align="center" class="fenlei"><strong>查看</strong></td>
<td align="center" class="fenlei"><strong>刪除</strong></td>
</tr>
<%
dim i
for i=1 to rs.pagesize
%>
<tr width="100%"
onmouseover="this.style.backgroundColor = '#F7FBFF'"
onmouseout="this.style.backgroundColor = '#FFFFFF'">
<td align="center" class="bordbg"><%=rs("fybm")%></td>
<td align="center" class="bordbg"><%=rs("fylb")%></td>
<td align="center" class="bordbg"><%=rs("qy")%></td>
<td align="center" class="bordbg"><%=rs("s")%>室<%=rs("t")%>廳<%=rs("w")%>衛</td>
<td align="center" class="bordbg"><%=rs("szc")%></td>
<td align="center" class="bordbg"><%=rs("jg")%> <%=rs("dw")%></td>
<td align="center" class="bordbg"><%=rs("jzmc")%></td>
<td align="center" class="bordbg"><%=rs("fbsj")%></td>
<td align="center" class="bordbg"><a href="ck_house.asp?id=<%=rs("id")%>&tp=<%="求租"%>''class="fontt" >查看</a></td>
<td align="center" class="bordbg"><a href="admin_qiuzu_del.asp?id=<%=rs("id")%>" class="fontt" >刪除</a></td>
</tr>
<%
rs.movenext
if rs.eof then exit for
next
%>
</table>
<br>
<tr>
<td height="20" align="center" class="font10">
<%if page_no>1 then %>
<a href="admin_qiuzu_fy.asp?page_no=<%=page_no-1%>" class="font10">[上一頁]</a>
<%end if%>
<%
for i=1 to rs.pagecount
if i=page_on then
response.write "["&i&"]"&" "
else
response.write "<a href='admin_qiuzu_fy.asp?page_no="&i&"'>" & i &"</a> "
end if
next
if page_no<rs.pagecount then
%>
<a href="admin_qiuzu_fy.asp?page_no=<%=page_no+1%>" class="font10">[下一頁]</a>
<%
end if
%>
共:<%=rs.pagecount%>頁
<%else
response.write "沒有任何數據!"
end if
%> </td>
</tr></td></tr>
</table>
</body>
</html>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -