|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
只要你想学,就没什么优缺点,上面那位大哥已经把网上的评论说了,但我认为想学哪个都一样,不然它就不可能在当今时代数字艺术方面存活到今天购物车|页面<!--put2bag.asp-->
<%@Language=VBScript%>
<%
id_type=request("id_type")
onerrorresumenext
Response.Buffer=true
Response.Expires=0
dimobj_bag,bag_item,cart
obj_bag----购物车
bag_item----商品的信息数据汇合
cart----一件商品的信息数据汇合
dimp_id,p_name,p_price,p_manu,p_type,p_size,p_color,p_num,p_temp
p_id----商品id号
p_name----商品称号
p_price----原价单价
p_manu----商品打造商
p_type----商品式样
p_size----商品尺寸
p_color----商品色彩
p_num----商品数目
p_temp----一时寄存p_num
ifsession("login")=""then
response.write"<scriptlangue=""javascript"">"&chr(13)
response.write"alert(""请先登录"");"&chr(13)
response.write"history.go(-1);"&chr(13)
response.write"</script>"&chr(13)
else
初始化购物车内变量
p_id=trim(request("id"))
P_manu=trim(request("manu"))
p_type=trim(request("type"))
p_name=replace(trim(request("name1")),"","")
p_price=trim(request("price"))
p_size=trim(request("size"))
p_color=trim(request("color"))
p_num=trim(request("num"))
if((notIsNumeric(p_num))or(p_num<="0")or(instr(1,p_num,".")0))then
p_num=1‘假如商品数目小于0大概有小数点,取1
endif
ifp_name""then
假如有购物信息传进则筹办装如购物车
假如还没有购物车则新建dictionary工具
&n</p>由于ASP还是一种Script语言所没除了大量使用组件外,没有办法提高其工作效率。它必须面对即时编绎的时间考验,同时我们还不知其背后的组件会是一个什么样的状况; |
|