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

📄 oldgoods.asp

📁 这是一个网上购物物网站,数据库的连接在CONN.ASP中,既有前台网站,也有后台管理
💻 ASP
字号:
<!--#include file="conn.asp"-->
<META http-equiv=Content-Type content="text/html; charset=gb2312"><LINK 
href="image/css.css" type=text/css rel=stylesheet>
<STYLE type=text/css>
.style1 {
	COLOR: #333333
}
.style3 {COLOR: #333333; font-size: large;}
body {
	margin-top: 10px;
}
.style8 {font-size: 12px}
</STYLE>

<META content="MSHTML 6.00.2800.1106" name=GENERATOR></HEAD>
<BODY leftMargin=0 marginwidth="0">
<TABLE class=table-1 cellSpacing=0 cellPadding=0 width=760 align=center 
border=0>
  <TBODY>
    <TR vAlign=bottom>
      <TD vAlign=center borderColor=#ffffff align=right width=174 bgColor=#ffffff 
    height=45>
        <DIV align=center class=style3>
          <div align="left"></div>
      </DIV></TD>
      <TD vAlign=center borderColor=#ffffff width=586 bgColor=#ffffff height=34><DIV align=right><a href="gouwu.asp?action=show"><IMG height=20 
      src="image/top_cart.gif" width=76 border=0></a><a href="user_index.asp"><IMG height=20 
      src="image/top_my.gif" width=76 border=0></a><a href="logout.asp"><IMG height=20 
      src="image/top_wh.gif" width=76 border=0></a>&nbsp; </DIV></TD>
    </TR>
    <TR>
      <TD height=4 colSpan=2 borderColor=#ffffff><img src="image/1.jpg" width="760" height="3"></TD>
    </TR>
    <TR bgColor=#ff9900>
      <th vAlign=top borderColor=#ffffff bgColor=#ffffff colSpan=2 height=19><div align="center">
          <table width="760" border="0" cellspacing="0" cellpadding="0">
            <tr>
              <td><div align="left"><span class="style8"><a href="index.asp"> 首 &nbsp;页</a> <a href="news.asp">商品信息</a> <a href="oldgoods.asp"> 个人商品</a> <a href="newhuiyuan.asp">最新会员</a> </span></div></td>
            </tr>
          </table>
      </div></th>
    </TR>
  </TBODY>
</TABLE>
<TABLE width=760 
border=0 align=center cellPadding=0 cellSpacing=0 class="table-zuoyou">
  <TBODY>
  <TR>
    <TD vAlign=top width=180>
      <TABLE class=table-shangxia cellSpacing=0 cellPadding=0 width="100%" 
      border=0>
        <TBODY>
        <TR>
          <TD bgColor=#f1f1f1 height=23>&nbsp;&nbsp;<SPAN 
            class=style1>会员登陆</SPAN></TD></TR></TBODY></TABLE>
      <TABLE cellSpacing=0 cellPadding=0 width="100%" align=center border=0>
        <TBODY>
        <TR>
          <TD height=41>
            <DIV align=center>


            <TABLE cellSpacing=1 cellPadding=1 width="95%" align=center 
border=0>
              <FORM name=userlogin action=../../homework/checkuserlogin.asp method=post>
              <TBODY>
              <TR>
                <TD align=middle height=22>
                  <DIV align=left><FONT 
                color=#999999>&nbsp;&nbsp;</FONT></DIV></TD></TR>
              <TR>
                <TD align=middle height=100>
                  <TABLE cellSpacing=2 cellPadding=0 align=center border=0>
                    <TBODY>
                    <TR vAlign=center>
                      <TD align=middle height=20>用户名:&nbsp; </TD>
                      <TD>
                        <DIV align=left><INPUT class=wenbenkuang id=username 
                        maxLength=12 size=12 name=username> </DIV></TD></TR>
                    <TR vAlign=center>
                      <TD align=middle>密&nbsp;&nbsp;码:&nbsp; </TD>
                      <TD>
                        <DIV align=left><INPUT class=wenbenkuang id=userpassword 
                        type=password maxLength=12 size=12 name=userpassword> 
                        </DIV></TD></TR>
                    <TR vAlign=center>
                      <TD align=middle><div align="center">
                            <INPUT class=go-wenbenkuang onclick="javascript:return checksignup()" type=submit value=提交 name=Submit>
                                                </div></TD>
                      <TD align=middle><div align="center">
                        <input class=go-wenbenkuang onClick="window.location='reg.asp'" type=reset value=取消 name=Submit2>
                      </div></TD>
                    </TR></TBODY></TABLE>
                  <P align="center">注册买家|注册卖家|忘记密码</P></TD></TR></FORM></TABLE></DIV></TD></TR>
        <TR>
          <TD height=3><TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
            <TBODY>
              <TR>
                <TD><BR>
                    <TABLE class=table-shangxia cellSpacing=0 cellPadding=0 width="100%" 
            border=0>
                      <TBODY>
                        <TR>
                          <TD bgColor=#f1f1f1 height=23> 商品搜索</TD>
                        </TR>
                      </TBODY>
                    </TABLE>
                    <TABLE cellSpacing=1 cellPadding=1 width="88%" align=center 
border=0>
                      <FORM name=form2 action=search.asp method=get>
                        <TBODY>
                          <TR>
                            <TD align=middle>&nbsp;</TD>
                          </TR>
                          <TR>
                            <TD align=middle>关键字:
                                <INPUT  name="key" type="text" class=wenbenkuang size=15  ;>
                            </TD>
                          </TR>
                          <TR>
                            <TD height=23 align=middle>
                              <div align="center"> &nbsp;&nbsp;
                                  <INPUT class=go-wenbenkuang type=submit value=查询商品  询 name=Submit3>
                              </div>
                              <div align="center"> </div></TD>
                          </TR>
                          <TR>
                            <TD height=23 align=middle>&nbsp;</TD>
                          </TR>
                          </FORM>
                    </TABLE></TD>
              </TR>
            </TBODY>
          </TABLE></TD></TR></TABLE>
      <TABLE class=table-shangxia cellSpacing=0 cellPadding=0 width="100%" 
      border=0>
        <TBODY>
        <TR>
          <TD bgColor=#f2f2f2 height=23> 我的购物车</TD></TR></TBODY></TABLE>
      <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
        <TBODY>
        <TR>
          <TD>
            <table width="88%" border="0" cellpadding="0" cellspacing="0" align="center" height="63">
              <%
					  if session("username")<>"" then 
					  set rs=server.CreateObject("adodb.recordset")
					  rs.open "select count(*) as rec_count from act where username='"&session("username")&"' and zhuangtai=7",conn,1,1
					  rec_count=rs("rec_count")
					  rs.close
					  rs.open "select sum(zonger) as zongji from act where username='"&session("username")&"' and zhuangtai=7",conn,1,1
					  %>
              <tr>
                <td height="2" align=cneter></td>
              </tr>
              <tr>
                <td height="20" align="center"> 有<font color=red><%=rec_count%></font>种商品在购物车内 </td>
              </tr>
              <tr>
                <td height="20" align="center"> 总计¥:<font color=red><%=rs("zongji")%></font>元 </td>
              </tr>
              <tr>
                <td height="8" align="center"></td>
              </tr>
              <tr>
                <td height="20" align=center><a href="gouwu.asp?action=show">查看购物车/结帐&gt;&gt;</a></td>
              </tr>
              <tr>
                <td height="1" background="images/ppb.gif"></td>
              </tr>
              <%rs.close
							  set rs=nothing
							  else%>
              <tr>
                <td height="2" align=cneter></td>
              </tr>
              <tr>
                <td height="20">
                  <div align="center">有<font color=red>0</font>种商品在购物车内<br>
        总计¥:<font color=red>0</font>元</div></td>
              </tr>
              <tr>
                <td height="1"></td>
              </tr>
              <%end if%>
            </table></TD></TR></TBODY></TABLE>
      <TABLE class=table-shangxia cellSpacing=0 cellPadding=0 width="100%" 
      border=0>
        <TBODY>
        <TR>
          <TD bgColor=#f2f2f2 height=23> 商品分类</TD></TR></TBODY></TABLE>
      <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
        <TBODY>
        <TR>
          <TD>
            <TABLE cellSpacing=0 cellPadding=0 width="90%" align=center 
border=0>
              <TBODY>
              <TR>
                <TD height=6></TD></TR>
              <TR>
                <TD height=20>
                  <DIV align=center></DIV>
                  <table width=100% cellspacing="0" cellpadding="0" border="0">
                    <%
	    set rs=server.CreateObject("adodb.recordset")
	    rs.open "select * from bigclass ",conn,1,1
	    if rs.recordcount=0 then 
%>
                    <tr>
                      <td colspan=2 height="22">暂无分类</td>
                    </tr>
                    <%
	    else
	    	i=0
		while not rs.eof
%>
                    <tr>
                      <td align=right width=49% height="22" class="table-xia"><a href="shangpin.asp?bigclass=<%=rs("bigid")%>"><%=rs("bigclass")%></a></td>
                      <%rs.movenext
if rs.eof then 
response.write "<td align=center>&nbsp;</td></tr>"
else
%>
                      <td align=left width=51% height="22" class="table-xia">&nbsp;<font color="#666666">|</font>&nbsp;<a href="shangpin.asp?bigclass=<%=rs("bigid")%>"><%=rs("bigclass")%></a></td>
                    </tr>
                    <%
rs.movenext
end if%>
                    <%
		wend
	    end if
%>
                  </table></TD></TR>
              <TR>
                <TD></TD></TR>
              <TR>
                <TD height=1></TD></TR>
              <TR>
                <TD height=1></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></TD>
    <TD vAlign=top borderColor=#ffffff 
    bgColor=#ffffff class=table-zuoyou>
      <DIV align=center>
      <TABLE class=table-shangxia cellSpacing=0 cellPadding=0 width="100%" 
      border=0>
        <TBODY>
        <TR>
          <TD bgColor=#f2f2f2 height=23> 个人商品交易</TD>
        </TR></TBODY></TABLE>
      <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
        <TBODY></TBODY></TABLE><table width="95%" border="0" cellpadding="0" cellspacing="0">
        <% 

page=clng(request("page"))		 
Set rs=Server.CreateObject("ADODB.RecordSet") 
sql="select * from oldgoods order by addtime desc"
rs.Open sql,conn,1,1
if rs.eof and rs.bof then
response.Write("暂时没有记录")
else 
%>
        <tr> 
          <td width="6%" height="30" rowspan="2">&nbsp;</td>
          <td height="24"> </td>
          <td width="18%" align="center"></td>
        </tr>
        <tr> 
          <td height="2" colspan="2" bgcolor="#6699cc"> </td>
        </tr>
        <% 
rs.PageSize=5
if page=0 then page=1 
pages=rs.pagecount
if page > pages then page=pages
rs.AbsolutePage=page  
for j=1 to rs.PageSize 
%>
        <tr> 
          <td height="24" align="center" ></td>
          <td height="24" colspan="2" background="img/line1.gif" > <table width="100%" border="0" cellspacing="0" cellpadding="2" align="center">
  <tr> 
    <td rowspan="6" width="30%" class="table-xia"> 
      
      <div align="center">
        <table width="99" border="0" cellspacing="0" cellpadding="0" height="99">
          <tr>
            <td background="images/xt_bj.gif">
              <div align="center"><img src="upload/<%=trim(rs("img"))%>"  width=93 height="96" border=0></div>
            </td>
          </tr>
        </table>
      
      </div>
    </td>
    <td width="70%"><font color="#990000">商品名称:<%=trim(rs("name"))%></font></td>
  </tr>
  <tr> 
    <td width="70%"><span class="style1">
      出售&#20215;格:<font color=red><%=trim(rs("hyprice"))%></font><font color=red></font></span> </td>
  </tr>
  <tr> 
    <td width="70%">email:<span class="style1"><font color=red></font></span><span class="style1"><font color=red><%=trim(rs("email"))%></font></span></td>
  </tr>
  <tr>
    <td>联系电话:<span class="style1"><font color=red><%=trim(rs("telphone"))%></font></span></td>
  </tr>
  <tr>
    <td>加入时间:<span class="style1"><font color=red><%=trim(rs("addtime"))%></font></span></td>
  </tr>
  <tr> 
    <td width="70%" > 
    相关说明:
      <%if len(trim(rs("content")))>50 then
	response.write left(trim(rs("content")),50)&"...."
	else
	response.write trim(rs("content"))
	end if%>
      </font></td>
  </tr>
</table></td>
        </tr>
        <%
rs.movenext
if rs.eof then exit for
next
%>
        <tr > 
            <td height="56" colspan="3" align="center" > 
          
              <%if Page<2 then      
    response.write "首页 上一页&nbsp;"
  else
    response.write "<a href=oldgoods.asp?bigclass="&bigclass&"&page=1>首页</a>&nbsp;"
    response.write "<a href=oldgoods.asp?bigclass="&bigclass&"&page=" & Page-1 & ">上一页</a>&nbsp;"
  end if
  if rs.pagecount-page<1 then
    response.write "下一页 尾页"
  else
    response.write "<a href=oldgoods.asp?bigclass="&bigclass&"&page=" & (page+1) & ">"
    response.write "下一页</a> <a href=oldgoods.asp?bigclass="&bigclass&"&page="&rs.pagecount&">尾页</a>"
  end if
   response.write "&nbsp;页次:<strong><font color=red>"&Page&"</font>/"&rs.pagecount&"</strong>页 "
    response.write "&nbsp;共<b><font color='#FF0000'>"&rs.recordcount&"</font></b>条记录 <b>"&rs.pagesize&"</b>条记录/页"
     
%>           </td> 
         
        </tr>
<% 
end if
rs.close
set rs=nothing
%>
    </table>
      
  
  <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
        <TBODY></TBODY></TABLE>
</DIV>      </TD>
  </TR></TBODY></TABLE>
</BODY></HTML>

⌨️ 快捷键说明

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