ASP网上购书_论文天下网

p;    return false;
‘并且Email不允许为空
alert("Email不能为空！");
   document.shouhuoxx.useremail.focus();
   return false;
‘如果已经下单了，是不允许再次下单的，
conn.execute "delete from shop_action where username='"&request.cookies("bookshop")("username")&"' and bookid in ("&bookid&") and zhuangtai=6"
rs2.movenext
loop
rs2.close
set rs2=nothing
session("xiadan")=minute(now)
else
response.Write "<center>您不能重复提交！</center>"
response.End
‘再次计算出所需的总额：
<%dim iiii '计算总额
        do while not rs.eof
        iiii=rs("huiyuanjia")*rs("bookcount")+iiii%>
        <tr>
          <td bgcolor="#EFF5FE"><%response.Write "<a href=book.asp?id="&rs("bookid")&" target=_blank>"&rs("bookname")&"</a>"%></td>
          <td bgcolor="#EFF5FE"><div align="center"><%=formatnumber(rs("shichangjia"),2)&"元"%></div></td>
          <td bgcolor="#EFF5FE"><div align="center"><%=formatnumber(rs("huiyuanjia"),2)&"元"%></div></td>
          <td bgcolor="#EFF5FE"><div align="center"><%=rs("bookcount")%></div></td>
          <td bgcolor="#EFF5FE"><div align="center"><%=formatnumber(rs("huiyuanjia")*rs("bookcount"),2)&"元"%>　</div></td>
        </tr><%rs.movenext
    loop
    rs.movefirst
    %>
‘并且显示您的收货方式与确认订单：
<td colspan="5" bgcolor="#EFF5FE"><div align="right"><%response.write "<font color=#FF6600>您选择的送货方式是："
    '///判断送货方式读取加收金额
    set rs3=server.CreateObject("adodb.recordset")
    rs3.open "select * from shop_songhuo where songid="&int(rs("songhuofangshi")),conn,1,1
    if rs3.eof and rs3.bof then
    response.write "方式已经被删除"
    response.write " +"&formatnumber(0,2)&"元   共计："
    response.write formatnumber(iiii,2)&"元"
    else
    response.Write trim(rs3("subject"))
    response.write " +"&formatnumber(rs3("jsmoney"),2)&"元   共计："
    response.write formatnumber(iiii+rs3("jsmoney"),2)&"元"
    end if
    rs3.close
    set rs3=nothing%>    </font></div></td>
‘显示用户的性别：
if request("shousex")=0 then
    response.Write " (先生)"
    else
    response.Write "&

首页上一页 8 9 10 11 12 下一页尾页 11/12/12

ASP网上购书(十一)