 |
 |
|
 |
|
|
|
|
<%
descadd = request("Cuddles_Cart_1_Description_Add")
priceadd = request("Cuddles_Cart_1_Price_Add")
initials = request("initials")
embr = request("embr")
if embr = "on" then
totalprice = priceadd + 10
orderdetails = descadd & "; Monogramming: '" & initials & "'"
else
totalprice = priceadd
orderdetails = descadd
end if
' WA eCart AddToCart
if (cStr(Request.Form("Cuddles_Cart_1_ATC")) <> "" OR cStr(Request.Form("Cuddles_Cart_1_ATC.x")) <> "") then
ATC_itemID = cStr(Request.Form("Cuddles_Cart_1_ID_Add"))
ATC_AddIfIn = 2
ATC_RedirectAfter = "cart.asp"
ATC_RedirectIfIn = ""
ATC_itemName = Request.Form("Cuddles_Cart_1_Name_Add")' column binding
ATC_itemDescription = orderdetails 'Request.Form("Cuddles_Cart_1_Description_Add")' column binding
ATC_itemWeight = Request.Form("Cuddles_Cart_1_Weight_Add")' column binding
ATC_itemQuantity = Request.Form("Cuddles_Cart_1_Quantity_Add")' column binding
ATC_itemPrice = totalprice 'Request.Form("Cuddles_Cart_1_Price_Add")' column binding
ATC_itemShipping = Request.Form("Cuddles_Cart_1_Shipping_Add")'column binding
if (IsNumeric(ATC_itemQuantity) AND ATC_itemQuantity <> 0) then
set Cuddles_Cart = Cuddles_Cart_AddToCart(ATC_AddIfIn, ATC_RedirectIfIn, ATC_itemID, ATC_itemName, ATC_itemDescription, ATC_itemWeight, ATC_itemQuantity, ATC_itemPrice, ATC_itemShipping)
if (ATC_RedirectAfter <> "" AND Cuddles_Cart_redirStr = "") then
Cuddles_Cart_redirStr = ATC_RedirectAfter
end if
end if
end if
%>
<%
' WA eCart Redirect
if (Cuddles_Cart_redirStr <> "") then
Response.Redirect(Cuddles_Cart_redirStr)
end if
%>
|
|
|
| |
|
|