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

📄 buycar_see.asp

📁 图书管理系统的所有程序
💻 ASP
字号:
<!-- #include file="conn/conn.asp" -->
<% if request.Form("jiezhang")="保存订单" then
response.Redirect("checkout.asp")
end if 
If Len(Session("BookIDList")) <> 0 Then 
sql = "Select * From tb_bookinfo Where barcode In (" &_
 session("bookIDList") & ") Order By barcode"
Set rs = conn.Execute( sql )
else
Response.Redirect "buycar_empty.asp"
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>查看购物车</title>
<LINK rel="stylesheet" href="CSS/STYLE.CSS" type="text/css">
<script language="JavaScript">
function stand(){
window.close();}
</script>
</head>
<body leftmargin="0" topmargin="0"> 
<table width="680" height="58" border="0" align="center" cellpadding="-1" cellspacing="-1"> 
  <tr> 
    <td height="58" valign="bottom" bgcolor="#FFFFFF"><div align="right"><img src="images/my_car.gif"></div></td> 
  </tr> 
</table> 
<table width="680" border="0" align="center" cellpadding="-1" cellspacing="-1"> 
  <tr> 
    <td valign="top" background="images/buycar_bottom.jpg"> <div align="center"> 
        <form name="form1" method="post" action="buycar_see.asp"> 
          <br> 
          <table width="97%" height="52" border="1" align="center" cellpadding="0"
		   cellspacing="0" bordercolordark="#0099FF" bordercolorlight="#FFFFFF"
		    bordercolor="#FFFFFF"> 
            <tr bgcolor="#FFB482"> 
              <td width="22%" height="16"><div align="center">条形码</div></td> 
              <td width="31%"><div align="center">书 名</div></td> 
              <td width="17%"><div align="center">单价</div></td> 
              <td width="9%"><div align="center">数量</div></td> 
              <td width="14%"><div align="center">金额</div></td> 
              <td width="7%"><div align="center">移去</div></td> 
            </tr> 
            <% i=0 
		sum=0
		session("sl")=""
		session("checkBook")=""
		%> 
            <%
		while not rs.eof
		  sql="select * from tb_fixprice where Barcode="&rs("barcode")
	      set rs1=server.CreateObject("adodb.recordset")
	       rs1.open sql,conn,3,3
		   If rs1.eof or rs1.bof Then  '当用户选择的图书没有重新订价时,现价显示为原定价
				sellPrice=rs("price")
		   Else
				sellPrice=rs1("SellPrice")
		   End If%> 
            <tr> 
              <td height="16">&nbsp;<%=rs("barcode")%></td> 
              <td>&nbsp;<%=rs("BookName")%></td> 
              <% i=i+1 %> 
              <% sl = Request( "sl"&i)
				If sl <= 0 Then sl = 1
					Sum = Sum + CDbl(sellPrice) * sl %> 
              <td><div align="right"> 
                  <input name=<%= "price"&i%> type="text" class="Sytle_auto"
				   id="price" value=<%=CDbl(sellPrice)%>
				   size="3" readonly="yes" style="border-left:none;border-right:none;border-top:none"> 
                  (元)</div></td> 
              <td><div align="center"> 
                  <input name=<%= "sl"&i%> type="text" class="Sytle_auto_s" id="sl"
				   onChange="JScript:form1.submit();" value=<%= sl%> size="4"> 
                </div></td> 
              <td><div align="right"> 
                  <input name=<%= "je"&i%> type="text" class="Sytle_auto"
				   id="je" value=<%=CDbl(sellPrice)*sl%> size="6" readonly="yes" style="border-left:none;border-right:none;border-top:none"> 
                  (元)</div></td> 
              <td><div align="center"><a href="move.asp?clickBookID=<%=rs("barcode")%>"> <img src="images/move.gif" border="0"></a></div></td> 
            </tr> 
            <%
			if len(session("sl"))=0 then
				session("sl")=sl
			else 
				session("sl")=session("sl")&", "&sl 
			end if 
			if len(session("checkBook"))=0 then
				session("checkBook")="'"& rs("barcode")& "'"
			else 
				session("checkBook")=session("CheckBook")&", '"& rs("barcode")& "'"
			end if 
            rs.movenext
		wend %> 
          </table> 
          <table width="97%" height="40" border="0" cellpadding="-1"
		   cellspacing="-1" class="Sytle_auto"> 
            <tr> 
              <td><div align="right">合计金额:
                  <input name="sum" type="text" class="Sytle_auto" id="sum2"
				 value=<%= sum %> size="10" readonly="yes"> 
                  (元)</div></td> 
            </tr> 
          </table> 
          <table width="97%" height="39" border="0" cellpadding="-1" cellspacing="-1"> 
            <tr bgcolor="#FFCF00"> 
              <td width="79%" bgcolor="#FFFFFF"><div align="center"> 
                  <input type="submit" name="modifysl" value="修改数量" style="border:1px solid;border-color:#FF6666;background-color:#FFCC00;padding:3px"> 
                  <input type="submit" name="jiezhang" value="保存订单" style="border:1px solid;border-color:#FF6666;background-color:#FFCC00;padding:3px"> 
                  <input type="button" name="goon" value="继续选择图书" onClick="stand()" style="border:1px solid;border-color:#FF6666;background-color:#FFCC00;padding:3px"> 
                </div></td> 
              <td width="5%" bgcolor="#FFFFFF"><div align="center"><a href="clear.asp"> <img src="images/emptybuycar.gif" width="20" height="20" border="0"></a></div></td> 
              <td width="16%" bgcolor="#FFFFFF"><a href="clear.asp">清空购物车 </a></td> 
            </tr> 
          </table> 
        </form> 
      </div></td> 
  </tr> 
</table> 
</body>
</html>

⌨️ 快捷键说明

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