?? goods_list.asp
字號:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="../Inc/AdminChk.asp"-->
<!--#include file="Conn.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>多多校園產品后臺管理官方網站http://www.ddtaobao.com</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="keywords" content="多多校園產品后臺管理官方網站http://www.ddtaobao.com">
<meta name="description" content="多多校園產品后臺管理官方網站http://www.ddtaobao.com">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312"><link rel="stylesheet" type="text/css" href="img/admin_style.css">
</head>
<body><!--#include file="top.asp"-->
<table width="100%" border="0" cellpadding="2" cellspacing="1" bgcolor="#FFFFFF" class="border">
<tr align="center">
<td height=20 class="topbg" colspan="2">多多校園管理</tr>
<tr>
<td align="center">
<%
set rs=server.createobject("adodb.recordset")
sql="select * from goods_info"
rs.open sql,conn,1,3
%>
<SCRIPT LANGUAGE="JavaScript">
<!--
function GoPage() {
window.location.href="?page_no="+ page.value;
}
//-->
</SCRIPT>
<table width="100%" border="0" cellspacing="1" bgcolor="#62C0FF" cellpadding="2">
<tr>
<td bgcolor="#FFFFFF"><font class=font>ID</font></td>
<td bgcolor="#FFFFFF"><font class=font>商品名稱</font></td>
<td bgcolor="#FFFFFF"><font class=font>價格</font></td>
<td bgcolor="#FFFFFF"> <font class=font>數量</font></td>
<td bgcolor="#FFFFFF"><font class=font>圖片</font></td>
<td bgcolor="#FFFFFF"><font class=font>修改</font></td>
<td bgcolor="#FFFFFF"><font class=font>刪除</font></td>
</tr>
<%
IF not rs.eof and not rs.bof then
dim page_size
dim page_no
dim page_total
page_size=10
if request.QueryString("page_no")="" then
page_no=1
else
page_no=cint(request.QueryString("page_no"))
end if
rs.pagesize=page_size
page_total=rs.pagecount
rs.absolutepage=page_no
dim I,J
I=0
J=page_size
do while not rs.eof and J>0
J=J-1
I=I+1
%>
<tr>
<td bgcolor="#FFFFFF"><%=rs("goods_id")%></td>
<td bgcolor="#FFFFFF"><%=rs("goods_name")%></td>
<td bgcolor="#FFFFFF"><%=rs("goods_price")%></td>
<td bgcolor="#FFFFFF"><%=rs("goods_amount")%></td>
<td bgcolor="#FFFFFF"><img src=../<%=rs("goods_pic")%> border=0 width=30 height=30></td>
<td bgcolor="#FFFFFF"><a href="goods_edit.asp?goods_id=<%=rs("goods_id")%>">修改</a></td>
<td bgcolor="#FFFFFF"><a href="goods_del.asp?goods_id=<%=rs("goods_id")%>">刪除</a></td>
</tr>
<%
Rs.MoveNext
Loop
End IF
%>
</table>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0" class="page" >
<tr>
<td bgcolor="#FFFFFF"><div align="center">[本頁是<%=int(page_no)%>/<%=int(page_total)%>] [<a href="?page_no=1">第一頁</a>]
<%if int(page_no)>1 then%>
[<a href="?page_no=<%=cstr(int(page_no-1))%>">前一頁</a>]
<%elseif int(page_no)<=1 then%>
[<a href="?page_no=1">前一頁</a>]
<%end if%>
<%if int(page_no)<int(page_total) then%>
[<a href="?page_no=<%=cstr(int(page_no+1))%>">后一頁</a>]
<%elseif int(page_no)>=int(page_total) then%>
[<a href="?page_no=<%=cstr(int(page_total))%>">后一頁</a>]
<%end if%>
[<a href="?page_no=<%=page_total%>">最后一頁</a>] 轉到
<input name="page" type="text" value="<%=page_no%>" size="5">頁
<input type="button" class=input name="Submit" value="轉到" onclick="GoPage()"></div></td>
</tr>
</table>
</td>
</tr>
</table><!--#include file="copy.asp"-->
</body>
</html>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -