📄 goods.asp
字号:
<!--#include file="top.asp"-->
<%
if session("user_id")="" then
response.write "<script language='javascript'>" & VbCRlf
response.write "alert('非法操作!');" & VbCrlf
response.write "history.go(-1);" & vbCrlf
response.write "</script>" & VbCRLF
else
%>
<TABLE width=760 border=0 align=center cellpadding="4">
<TBODY>
<TR>
<TD vAlign=top width=161><TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD><IMG height=10 src="images/kuai01.gif" width=161></TD>
</TR>
<TR>
<TD> <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD width=11 background=images/kuai04.gif> </TD>
<TD bgColor=#f8f8fa><table width="100%" border="0">
<tr>
<td><IMG height=8 src="images/dot.gif" width=4> <a href="user.asp">店铺管理中心</a></td>
</tr>
<tr>
<td><a href="user_edit.asp"> 基本资料管理</a></td>
</tr>
<tr>
<td><a href="shop_img.asp"> 店铺图片管理</a></td>
</tr>
<tr>
<td><a href="goods.asp"> 商品管理</a></td>
</tr>
<tr>
<td> <a href="help.asp" target="_blank">店铺帮助</a></td>
</tr>
<tr>
<td> <a href="user_logout.asp">店长退出</a></td>
</tr>
</table></TD>
<TD width=11 background=images/kuai05.gif> </TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
<TR>
<TD><IMG height=15 src="images/kuai02.gif" width=161></TD>
</TR>
<TR>
<TD> <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD width=11 background=images/kuai04.gif> </TD>
<TD bgColor=#f8f8fa><table width="100%" border="0">
<tr>
<td><IMG height=8 src="images/dot.gif" width=4> <strong></strong>本站新闻</td>
</tr>
<tr>
<td><table width="100%" border="0" style="border-collapse: collapse">
<%
Set rs= conn.execute("select * from news order by news_id desc" )
do while not rs.eof
%>
<tr>
<td height=18 >·<a href="news_info.asp?news_id=<%=rs("news_id")%>" target="_blank"><%=rs("news_title")%></a></td>
<% i=i+1
if i>=6 then exit do
rs.movenext
loop
rs.close
set rs=nothing
%>
</tr>
</table></td>
</tr>
</table></TD>
<TD width=11 background=images/kuai05.gif> </TD>
</TR>
</TABLE></TD>
</TR>
<TR>
<TD bgColor=#dbdbdb><IMG height=10 src="images/kuai03.gif" width=161></TD>
</TR>
<TR>
<TD height=5 bgColor=#dbdbdb><IMG height=5
src="images/kuai14.gif" width=161></TD>
</TR>
</TABLE></TD>
<TD align="center" vAlign=top> <p>
<%
const MaxPerPage=5 '单独页最大记录数 const 用来申明常量
dim sql
dim rs
dim totalPut '总记录
dim CurrentPage '当前页次
dim TotalPages '总页数
dim i
set rs=server.createobject("adodb.recordset")
sql="select * from goods_info where user_id="&session("user_id")&""
rs.open sql,conn,1,3
if rs.eof or rs.bof then
%>
</p>
<TABLE cellSpacing=0 cellPadding=0 width="570" border=0>
<TBODY>
<TR>
<TD width=11 height=11><IMG height=11 src="images/kuai06.gif"
width=11></TD>
<TD background=images/kuai10.gif><IMG height=11
src="images/kuai10.gif" width=1></TD>
<TD width=11 height=11><IMG height=11 src="images/kuai07.gif"
width=11></TD>
</TR>
</TBODY>
</TABLE>
<TABLE cellSpacing=0 cellPadding=0 width="570" border=0>
<TBODY>
<TR>
<TD width=8 background=images/kuai12.gif> </TD>
<TD bgColor=#d3e1fd height=21> <TABLE width="100%" border=0>
<TBODY>
<TR>
<TD align=middle width=25><IMG height=15
src="images/y1.gif" width=13></TD>
<TD>商品管理</TD>
<TD align="right"><a href="goods_add.asp">发布商品</a> </TD>
</TR>
</TBODY>
</TABLE></TD>
<TD width=8 background=images/kuai11.gif> </TD>
</TR>
<TR>
<TD width=8 background=images/kuai12.gif> </TD>
<TD align="center">还没有任何商品！ </TD>
<TD width=8 background=images/kuai11.gif> </TD>
</TR>
</TBODY>
</TABLE>
<TABLE cellSpacing=0 cellPadding=0 width="570" border=0>
<TBODY>
<TR>
<TD width=11 height=11><IMG height=11 src="images/kuai08.gif"
width=11></TD>
<TD background=images/kuai13.gif><IMG height=11
src="images/kuai10.gif" width=1></TD>
<TD width=11 height=11><IMG height=11 src="images/kuai09.gif"
width=11></TD>
</TR>
</TBODY>
</TABLE>
<%else%>
<TABLE cellSpacing=0 cellPadding=0 width="570" border=0>
<TBODY>
<TR>
<TD width=11 height=11><IMG height=11 src="images/kuai06.gif"
width=11></TD>
<TD background=images/kuai10.gif><IMG height=11
src="images/kuai10.gif" width=1></TD>
<TD width=11 height=11><IMG height=11 src="images/kuai07.gif"
width=11></TD>
</TR>
</TBODY>
</TABLE>
<TABLE cellSpacing=0 cellPadding=0 width="570" border=0>
<TBODY>
<TR>
<TD width=8 background=images/kuai12.gif> </TD>
<TD bgColor=#d3e1fd height=21> <TABLE width="100%" border=0>
<TBODY>
<TR>
<TD align=middle width=25><IMG height=15
src="images/y1.gif" width=13></TD>
<TD>商品管理</TD>
<TD align="right"><a href="goods_add.asp">发布商品</a> </TD>
</TR>
</TBODY>
</TABLE></TD>
<TD width=8 background=images/kuai11.gif> </TD>
</TR>
<TR>
<TD width=8 background=images/kuai12.gif> </TD>
<TD align="center">
<table width="98%" border="0">
<tr align="center">
<td width="15%">商品名称</td>
<td>商品描述</td>
<td width="12%">商品价格</td>
<td width="12%">商品数量</td>
<td width="10%">有效期</td>
<td width="15%">上架时间</td>
<td width="8%">修改</td>
<td width="8%">删除</td>
</tr>
<%do while not rs.eof%>
<tr>
<td align="center"><a href="goods_info.asp?goods_id=<%=rs("goods_id")%>" target="_blank"><%=rs("goods_name")%></a></td>
<td align="center"><%=left(rs("goods_content"),100)%></td>
<td align="center"><%=rs("goods_price")%>元</td>
<td align="center"><%=rs("goods_amount")%>个</td>
<td align="center"><%=rs("goods_long")%>天</td>
<td align="center"><%=rs("goods_date")%></td>
<td align="center"><a href="goods_edit.asp?goods_id=<%=rs("goods_id")%>">修改</a></td>
<td align="center"><a href="goods_del.asp?goods_id=<%=rs("goods_id")%>">删除</a></td>
</tr>
<%
rs.MoveNext
Loop
%>
</table>
</TD>
<TD width=8 background=images/kuai11.gif> </TD>
</TR>
</TBODY>
</TABLE>
<TABLE cellSpacing=0 cellPadding=0 width="570" border=0>
<TBODY>
<TR>
<TD width=11 height=11><IMG height=11 src="images/kuai08.gif"
width=11></TD>
<TD background=images/kuai13.gif><IMG height=11
src="images/kuai10.gif" width=1></TD>
<TD width=11 height=11><IMG height=11 src="images/kuai09.gif"
width=11></TD>
</TR>
</TBODY>
</TABLE>
<%end if%>
</TD>
</TR>
</TBODY>
</TABLE>
<%end if%>
<!--#include file="bottom.asp"-->
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -