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

📄 buy.asp

📁 商品订单管理:商品分类管理 添加与修改商品 管理订单 投诉订单 反馈信息 商品留言管理 管理网站用户:管理用户 管理后台管理员 新闻公告管理:新闻添加(支持图片新闻) 修改删除 首页公告设置 网站常规
💻 ASP
字号:

<!--#include file="conn.asp"--><head>
<link href=img/css.css rel=STYLESHEET type=text/css>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=ISO-8859-1">
<title><%if session("user_name")<>"" then%>
<%=session("user_name")%>'s Cart
<%else
response.write "My cart"
end if%>
</title>
</head> 
<body topmargin="0">
<font color="#000000"><b> 
<%
if session("user_name")="" then
        response.write  "<br>"
	response.write "<center>"
	response.write  "1.Already our member, Please Login First!"
        response.write "<br>"
	response.write  "<br>2.New to our, If you want to login, you'll need to register first.<a href=reg.asp target=_blank><font color=#FF0000> register </font></a>!"
	response.write  "<br>"
    response.end
end if

dim sql,rs
set rs=server.createobject("adodb.recordset")
if request("action")="buy" then

if request("count")="" then
    count=1
else
    count=Cint(request("count"))
end if

if request("hw_id")="" then
    response.write "the product is not found."
else
    hw_id = Request.QueryString("hw_id")
If Not(isNumeric(hw_id)) Then
Response.Write "<p align=center>The wrong URL.</p>"
Response.End
End If
end if

sql="select * from basket where hw_id='"&hw_id&"' and user_name='"&session("user_name")&"' and basket_check=false"
rs.open sql,conn,3,3
if rs.eof then
rs.addnew
rs("hw_id")=hw_id
rs("user_name")=session("user_name")
rs("basket_count")=count
rs("basket_date")=now()
rs("hw_name")=request("hw_name")
rs("hw_cash")=request("hw_cash")
rs("isbn")=request("isbn")
else
rs("basket_count")=int(rs("basket_count"))+int(count)
end if
rs.update
rs.close
%>
</b></FONT> 
<%end if%>
<br>
<table border="0" width="100%" cellspacing="0" cellpadding="0">
  <tr> 
    <td align="center">
    <img border="0" src="img/promo_list_top.gif" width="100%" height="4"></td>
  </tr>
  <tr> 
    <td height="18" align="center" bgcolor="#DBC2B0"><b><font color="#F4F4F4">The products in your cart:</font></b></td>
  </tr>
  <tr> 
    <td valign="top"><table border="0" width="100%" cellspacing="0" height="34" cellpadding="0">
        <tr> 
          <td bgcolor="#F5EFE7"><div align="center">
              <center> 
            <table width="90%" border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111">
              <tr background="img/tile_bg.gif"> 
                <td width="75" height="25"> <div align="center">Pruduct</div></td>
                <td width="65"> <div align="center">Price</div></td>
                <td width="65"> <div align="center">Points</div></td>
                <td width="65"> <div align="center">Count</div></td>
                <td width="65"> <div align="center">Order date</div></td>
                <td width="80"> <div align="center">Total Price</div></td>
                 <td width="60"> <div align="center">Total Points</div></td>
              </tr>
              <%sql="select * from basket where user_name='"&session("user_name")&"' and basket_check=false"
              rs.open sql,conn,3,3
              do while not rs.eof%>
              <tr> 
                <td width="75" height="25"> <div align="center"><a href="clear.asp?basket_id=<%=rs("basket_id")%>"><font color="#FF0000"><%=rs("hw_name")%></font></a></div></td>
                <td width="65" height="25"> <div align="center"> 
                    <%=rs("hw_cash")%> RMB</div></td>
                 <td width="65" height="25"> <div align="center"> 
                    <%=rs("isbn")%></div></td>    
                <td width="65" height="25"> <div align="center"><%=rs("basket_count")%> 
                  </div></td>
                <td width="65" height="25"> <div align="center"><%=rs("basket_date")%> 
                  </div></td>
                <%a=0%>
                <td width="80" height="25"> <div align="center"> 
                    <%=rs("hw_cash")*rs("basket_count")%> RMB </div></td>
                  <td width="60" height="25"> <div align="center"> 
                    <%=rs("isbn")*rs("basket_count")%></div></td>
                <%totalcash=totalcash+(rs("hw_cash")*rs("basket_count"))%>
                <%totalisbn=totalisbn+(rs("basket_count")*rs("isbn"))%>
              </tr>
              <%rs.movenext
              loop
              rs.close
              %>
              <tr> 
                <td width="321" height="25" colspan="7"><div align="center">You should pay:<%=totalcash%>RMB  Received Points:<%=totalisbn%></div></td>
            </table>
              </center>
          </div>
            <table width="100%" height="25" border="0" cellpadding="0" cellspacing="0">
              <tr> 
                <td valign="middle"><div align="center"><img src="img/seperator.gif" width="359" height="1"></div></td>
              </tr>
            </table></td>
          <td valign="top" bgcolor="#F5EFE7"><div align="right"></div></td>
        </tr>
      </table></td>
  </tr>
  <tr> 
    <td height="30" bgcolor="#F5EFE7"><table width="83%" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr> 
          <td width="33%"><a href="buy.asp"><img src="img/lookbcar.gif" width="100" height="20" border="0"></a></td>
          <td width="33%"><a href="clear.asp"><img src="img/relbcar.gif" width="100" height="20" border="0"></a></td>
          <td width="33%"><a href="cash.asp"><img src="img/gobuy.gif" width="100" height="20" border="0"></a></td>
        </tr>
      </table></td>
  </tr>
</table>

⌨️ 快捷键说明

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