⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 goods.asp

📁 一个较好的网上购物系统 是基于ASP的多用户网上商城
💻 ASP
字号:
<TABLE cellSpacing=0 cellPadding=0 width=760 align=center border=0 class=page>
  <TBODY>
    <TR> <td><!--#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 cellSpacing=0 cellPadding=0 >
  <TBODY>
    <TR> 
      <td width=176 valign=top>
           
               <!--#include file="center.asp"--></td><td bgcolor="#59be48" width="1"></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"--></TD>
    </TR>
  </TBODY>
</TABLE>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -