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

📄 cash.asp

📁 ASP+ACCESS 产品报价系统 开发环境简单 主要是周杰伦FANs的交互活动
💻 ASP
字号:
<!--#include file="conn.asp"--><head>
<link href=css.css rel=STYLESHEET type=text/css>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>杰拍网-收银台</title></head> 
<body topmargin="0">
<font color="#000000"><b> 
<%
if session("user_name")="" then
    response.write  "<br>"
	response.write "<center>"
	response.write  "1.你尚未登录!请登录后再订购本站手机!"
    response.write "<br>2.第一次来本站,请先注册会员(免费)!"
	response.write  "<br>"
	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=request("count")
end if

if request("hw_id")="" then
    response.write "没有此货物!"
else
    hw_id=request("hw_id")
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("user_type")=request("user_type")
else
rs("basket_count")=int(rs("basket_count"))+int(count)
end if
rs.update
rs.close
%>
</b></FONT> 
<%end if%>
<br>
<form method="POST" action="cashsave.asp">
<TABLE 
                  width=418 border=0 align="center" cellPadding=5 cellSpacing=1 bgColor=#999999>
  <TBODY>
    <TR> 
      <TD align=middle bgColor=#fff2d5><div align="center"><font color="#990000"><strong>收 
          银 台</strong></font></div></TD>
    </TR>
    <TR> 
        <TD align=middle 
                bgColor=#FFFFFF> 
          <p align="left"><font color="#990000">您订购的物品如下:</font></p>  
          <table width="90%" height="96" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#CCCCCC" style="border-collapse: collapse">
            <tr bgcolor="#FFFFFF"> 
              <td width="179" height="25"> 
                <div align="center">商品名称</div></td>
              <td width="55" height="25"> 
                <div align="center">单价</div></td>
              <td width="60" height="25"> 
                <div align="center">数量</div></td>
              <td width="71" height="25"> 
                <div align="center">合计</div></td>
          </tr>
          <%
      user_name=session("user_name")
      sql="select * from basket where user_name='"&user_name&"' and basket_check=false"
      rs.open sql,conn,3,3
      if rs.eof then
          response.write "你没有订购任何商品"
      else
      do while not rs.eof
      %>
            <tr bgcolor="#FFFFFF"> 
              <td width="179" height="25"> 
                <div align="center"><font color=red><%=rs("hw_name")%></font></div></td>
              <td width="55" height="25"> 
                <div align="center"><%=rs("hw_cash")%>元</div></td>
              <td width="60" height="25"> 
                <div align="center"><%=rs("basket_count")%></div></td>
              <td width="71" height="25"> 
                <div align="center"><%=rs("hw_cash")*rs("basket_count")%>元 </div></td>
          </tr>
          <%totalcash=totalcash+(rs("hw_cash")*rs("basket_count"))%>
          <%rs.movenext
      loop
      end if
      rs.close
      %>
            <tr bgcolor="#FFFFFF"> 
              <td height="25"> 
                <div align="center"><b class="dz1">总计:<font color=red><%=totalcash%></font>元</b></div></td>
              <td height="25" colspan="3"> 
                <div align="center"><b class="dz1"> 
                  <input 
      align=absMiddle alt=确认 cache name="B12" 
      src="image/ok.gif" type=image tppabs="" width="45" height="20">
                </b></div></td>
          </tr>
        </table>
            
          <br>
        </TD>
    </TR>
  </TBODY>
</TABLE>
</form>

⌨️ 快捷键说明

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