%@ Language=VBScript %>
<% pageTitle = "Add To Cart" %>
Infinity Visions On line Store
| |
FOR INFORMATION
ABOUT OUR TERMS AND CONDITIONS PLEASE CONTACT
US
|
|
<%
else
intOrderID = cstr(Session("orderID"))
set rsProd = Server.CreateObject("ADODB.Recordset")
rsProd.Open "SELECT * FROM itemsOrdered " _
& "WHERE orderID="& intOrderID, _
iviDB, adOpenDynamic, adLockPessimistic, adCmdText
while not rsProd.EOF
element = "quant" & rsProd("productID")
intQuant = Request.form(element)
rsProd.MoveNext
wend
%>