⑴ asp 購物車
arrCart = Session("myCart")
CartIndex = Session("cartIndex")
count=0
for i=0 to CartIndex
if arrCart(i,2)<>"" then
if arrCart(i,2)>0 then
count=count+1
end if
end if
next
idbook = request.form("idbook")
bookname = request.form("bookname")
purchase = request.form("purchase")
availstock = request.form("availstock")
if purchase <>"" then
purchase=Cint(purchase)
availstock=availstock
if purchase>availstock then
htmlcode="你購買的數量超過了庫存圖書的數量！ <a href=""viewitem.asp?idbook="&idbook&"&bookname="&bookname&""">返回</a>"
response.write htmlcode
else
if purchase>0 then
call openDB()
sql="select price,discount from books where idbook="&idbook&" and bookname='"&bookname&"'"
set rs=conn.execute(sql)
nowprice=rs("price")*(100-rs("discount"))/100
arrCart(CartIndex,0) = idbook
arrCart(CartIndex,1) = bookname
arrCart(CartIndex,2) = purchase
arrCart(CartIndex,3) = nowprice
session("myCart") = arrCart
CartIndex = CartIndex + 1
Session("cartIndex") = CartIndex
call closeDB()
end if
response.redirect "showcart.asp"
end if
else
response.write"你沒有選擇圖書數量！"
end if
%>
在global.asa裡面有：
SUB Session_OnStart
Session("idcustomer") = ""
Session("adminname") = ""
Session("cartIndex") = Cint(0)
ReDim arrcart(50,3)
Session("myCart") = arrcart
END SUB
SUB Session_OnEnd
set Session("idCustomer") = Nothing
set Session("adminname") = Nothing
set Session("cartIndex") = Nothing
set Session("myCart") = Nothing
END SUB
重點是arrCart，myCart，cartIndex。
各代表什麼。添加商品入購物車的來龍去脈。詳細的可以再加分。
其中purchase＝要購買的數量
availstock＝可銷售的數量
bookname＝書籍名稱
解釋！！！！！！！！！！！！！！！！！！！
arrCart = Session("myCart") '/// 賦值arrCart 等於 myCart 這個伺服器變數
CartIndex = Session("cartIndex") '/// 賦值 CartIndex 等於 CartIndex 這個伺服器變數
count=0 '/// 賦值 count = 0
for i=0 to CartIndex '/// 一個循環開始，起點為i=0，終點為i=CartIndex
if arrCart(i,2)<>"" then '/// 如果arrCart這個二維數組中的第i,2項的值不為空，那麼。。。
if arrCart(i,2)>0 then '/// 如果 arrCart這個二維數組中的第i,2項的值大於0，那麼。。。
count=count+1 '/// 重新賦值count為原count再加上1
end if '/// 結束一個判斷
end if '/// 同上
next '/// 結束一個循環
idbook = request.form("idbook") '/// 賦值 idbook 等於 idbook 這個表單值
bookname = request.form("bookname") '/// 類上
purchase = request.form("purchase") '/// 類上
availstock = request.form("availstock") '/// 類上
if purchase <>"" then '/// 如果purchase不為空，那麼。。。
purchase=Cint(purchase) '/// 把purchase強制轉換為整型變數
availstock=availstock '/// 變數傳遞（同名變數，不知這步有什麼意義@@!）
if purchase>availstock then '/// 如果 purchase 大於 availstock 那麼。。。
htmlcode="你購買的數量超過了庫存圖書的數量！ <a href=""viewitem.asp?idbook="&idbook&"&bookname="&bookname&""">返回</a>"
'/// 賦值 htmlcode
response.write htmlcode '/// 輸出htmlcode這個值到頁面上
else '/// 否則（不滿足上面 purchase>availstock的時候）
if purchase>0 then '/// 如果 purchase>0 那麼。。。
call openDB() '/// 調用 openDB 這個過程（貌似是一個打開記錄集的過程）
sql="select price,discount from books where idbook="&idbook&" and bookname='"&bookname&"'"
'/// 定義一個sql語句
set rs=conn.execute(sql) '/// 調用一個sql（這里是一個查詢sql）
nowprice=rs("price")*(100-rs("discount"))/100
arrCart(CartIndex,0) = idbook
arrCart(CartIndex,1) = bookname
arrCart(CartIndex,2) = purchase
arrCart(CartIndex,3) = nowprice
session("myCart") = arrCart
CartIndex = CartIndex + 1
Session("cartIndex") = CartIndex
'/// 上面這幾句都是變數傳遞，沒什麼好解釋的
call closeDB() '/// 調用 closeDB這個過程（應該是關閉記錄集的過程吧）
end if '/// 結束一個判斷
response.redirect "showcart.asp" '/// 轉向到 showcart.asp 這個頁面
end if
else 否則（這里比較遠，是不滿足那個purchase<>""的時候）
response.write"你沒有選擇圖書數量！" '/// 輸出「你沒有。。。」到頁面
end if
%>
【其實你的問題的重點在下面這里】
在global.asa裡面有：
SUB Session_OnStart '/// 一個會話開始的時候
Session("idcustomer") = "" '/// 置空該值
Session("adminname") = "" '/// 置空該值
Session("cartIndex") = Cint(0) '/// 賦值伺服器變數cartIndex為整型的數字0
ReDim arrcart(50,3) '/// 定義一個二維數組arrcart
Session("myCart") = arrcart '/// 賦值伺服器變數myCart等於arrcart這個二維數組
END SUB
SUB Session_OnEnd '/// 一個會話結束的時候（後面都是清空伺服器變數的，沒什麼好解釋）
set Session("idCustomer") = Nothing
set Session("adminname") = Nothing
set Session("cartIndex") = Nothing
set Session("myCart") = Nothing
END SUB
arrCart，myCart其實都是用來存貯一個東西：購物車里的貨物的信息（用二維數組來存貯）
cartIndex，其實就是你購物車里的貨物數量，用來當做上面這個二維數組的游標的
⑵ 幫忙寫個ASP購物車頁面代碼
這個很多商城的源碼都帶有購物車功能的，如果你需要可以去剝離這個功能出來，我一直都是這樣做的，購物車模塊單是一頁代碼是不可能實現這個功能的，不要妄想網路知道這里貼一段代碼可以實現
⑶ ASP 購物車
<form method="post" action="cart.asp" onSubmit="return checkform(this);">
<input type="image" border="0" name="imageField" src="images/ref.gif" width="17" height="19">
</form>
<%
if not IsObject(session("cart")) then
Set session("cart")=CreateObject("Scripting.Dictionary")
end if
Set cart=session("cart")
proctID=Cstr(request("proctID"))
dim detail(1)
detail(0)=Int(request("quantity"))
if request("proctID")<>"" then
if cart.Exists(proctID) then
cart.Remove(proctID)
end if
cart.add proctID,detail
end if
keys=cart.keys
items=cart.items
set session("cart")=cart
%>
這些地方是在更新的，表單里的那個input src 的是提交按鈕
下面段是在更新數據的
⑷ 請問ASP商城購物車怎麼做
這個應該沒有什麼難的，點擊一個商品就把商品存到Session裡面，最後從Session裡面獲取商品列表，提專交，保屬存
沒有做過這種系統，估計差不多是這個樣子
可能有的系統會把商品寫入臨時表中，大概就這樣子吧，具體的要自己寫
⑸ 求asp購物車代碼
我發個經典的，建議你去文庫找下
<td><input type="button" onclick="javascript:document.form1.action='update.asp?rowcount=<%=i%>&pid=<%=rs(1)%>&pcount=<%=rs(3)%>';document.form1.submit();"value="確認修改"></td>
改為
<td><input type="button" onclick="javascript:document.form1.action='update.asp?id=<%=rs("Id")%>&rowcount=<%=i%>';document.form1.submit();"value="確認修改"></td>
<%
'這里需要注意在上個頁面，有個i值，在這里就用到了，你要指明修改的是哪一行記錄
......
response.redirect("mycar.asp")'執行完之後重新跳轉到mycar.asp
%>
改為
<%
'只需商品id和修改後的數量值
dim id
id=request.querystring("id")
pcount=request.querystring("pcount")
sql="update buy set pcount ='"&pcount&"' where Id="&id
conn.execute sql
conn.close
set conn=nothing
response.redirect("mycar.asp")'執行完之後重新跳轉到mycar.asp
%>
⑹ asp 購物車代碼問題
<td><input type="button" onclick="javascript:document.form1.action='update.asp?rowcount=<%=i%>&pid=<%=rs(1)%>&pcount=<%=rs(3)%>';document.form1.submit();"value="確認修改"></td>
改為
<td><input type="button" onclick="javascript:document.form1.action='update.asp?id=<%=rs("Id")%>&rowcount=<%=i%>';document.form1.submit();"value="確認修改"></td>
<%
'這里需要注意在上個頁面，有個i值，在這里就用到了，你要指明修改的是哪一行記錄
......
response.redirect("mycar.asp")'執行完之後重新跳轉到mycar.asp
%>
改為
<%
'只需商品id和修改後的數量值
dim id
id=request.querystring("id")
pcount=request.querystring("pcount")
sql="update buy set pcount ='"&pcount&"' where Id="&id
conn.execute sql
conn.close
set conn=nothing
response.redirect("mycar.asp")'執行完之後重新跳轉到mycar.asp
%>
⑺ 如何刪除ASP網站的購物車功能
修改提交之後直接轉入訂單界面，去掉訂單界面登錄檢測代碼
⑻ asp網站購物車代碼問題。先謝謝各位！
if session("hy")<>"yes" then
response.redirect "hy_dl.asp"
response.end
end if
刪除
⑼ asp做的購物車，現在每點一款商品加到購物車後
同樣原理,比如商品的ID是29,價格是88,那麼把這個商品加到購物車，session("proctList")就記錄了這個29，session("Price")就記錄88;
⑽ asp實現購物車功能
這個怎麼說呢。你首先要把購物車的流程寫出來,無論什麼程序都是需要業務流專程才能做出來的。你把流屬程寫出來了，代碼就很簡單了。既然你已經用cookie寫出來了，那麼你就不能做一個臨時表來存儲這些數據，用戶登錄就記錄用戶，用戶沒登錄在他結帳的時候提醒登錄。。（PS：這只是一個思路，授人以魚，比如授人以漁。）代碼給你了，你也只是交差，你可以自己先思考一下。確實寫不了。。在Q我。