欢迎来到Doc100.Net免费学习资源知识分享平台!
您的位置:首页 > 程序异常 >

asp网站购物车有关问题

更新时间: 2014-01-05 00:56:41 责任编辑: Author_N1

 

ASP网站购物车问题
这是一个订餐网站,实现类似购物车的功能,我是把商品放在数据库中,但是有一个问题,每刷新一次就往数据库中写一次,也就是加一次商品,有什么方法阻止写入数据库,想了很多办法,也不行,有什么办法,还是不写入数据库

代码如下:

<%set rs=server.CreateObject("adodb.recordset")
sql="select * from 购物车"
rs.open sql,conn,1,3
'炒菜
for i=1 to 80
  if request("tc"&i)<>"" then
     rs.addnew
     rs("餐品名称")=request("tc_name"&i)
     rs("单价")=request("tc_jg"&i)
 rs("数量")=request("tc"&i)
 rs("总价")=cint(request("tc_jg"&i))*cint(request("tc"&i))
 rs("登录名")=session("loginname")
 rs("类型")="炒菜"
 rs.update
  end if
next
'套餐
if request("leixing")="套餐" then
   if request("tcyc")<>"" and request("tcsc")<>"" then
      rs.addnew
  rs("餐品名称")=request("tcyc")&" "&request("tcsc")
  rs("单价")=16
  rs("数量")=1
  rs("总价")=16
  rs("登录名")=session("loginname")
  rs("类型")="套餐"
  rs.update
   end if
else
   for i=1 to 20
      if request("ddyc"&i)<>"" then
     rs.addnew
         rs("餐品名称")=request("ycmc"&i)
         rs("单价")=request("ycjg"&i)
     rs("数量")=request("ddyc"&i)
     rs("总价")=cint(request("ycjg"&i))*cint(request("ddyc"&i))
     rs("登录名")=session("loginname")
     rs("类型")="单点晕菜"
     rs.update
  end if
  
  if request("ddsc"&i)<>"" then
     rs.addnew
         rs("餐品名称")=request("scmc"&i)
         rs("单价")=request("scjg"&i)
     rs("数量")=request("ddsc"&i)
     rs("总价")=cint(request("scjg"&i))*cint(request("ddsc"&i))
     rs("登录名")=session("loginname")
     rs("类型")="单点素菜"
     rs.update
  end if
   next
end if
'推荐
if request("tj")<>"" then
   rs.addnew
   rs("餐品名称")=request("tjmc")
   rs("单价")=request("tjjg")
   rs("数量")=request("tj")
   rs("总价")=cint(request("tjjg"))*cint(request("tj"))
   rs("登录名")=session("loginname")
   rs("类型")="推荐"
   rs.update
end if
%>


--参考方法--
表单页不需要入库的 在处理页面获取数据 录入
--参考方法--
如果处理页与提交页在同一个文件内,提交数据后就跳回初始提交页页面
上一篇:上一篇
下一篇:下一篇

 

随机推荐程序问答结果

 

 

如对文章有任何疑问请提交到问题反馈,或者您对内容不满意,请您反馈给我们DOC100.NET论坛发贴求解。
DOC100.NET资源网,机器学习分类整理更新日期::2014-01-05 00:56:41
如需转载,请注明文章出处和来源网址:http://www.doc100.net/bugs/t/1665/
本文WWW.DOC100.NET DOC100.NET版权所有。