Electric Alice

Your Basket

<% if ProductCount>0 then %>

Below are your order details. To change the quantity of items you wish to order, change the number in the quantity field and click Update. You can change the delivery options using the radio buttons.

<% j = 0 rs.open "SELECT * FROM TempOrders WHERE VerificationID='" & VerificationID & "'",DBConn2,2,3 do while not rs.eof j = j + 1 rs2.open "Select Category, Quantity from Products Where ProductCode='" & rs("ProductCode") & "'", DBConn,1,3 if not rs2.eof then MaxQuantity = rs2("Quantity") if rs2("Category")<>"Accessories" and rs2("Category")<>"Hair Clips & Brooches" and rs2("Category")<>"Jewellery" then Accessories5 = false end if end if rs2.close %> <% ProductTotal = (rs("ProductPrice") * rs("ProductQuantity")) %> <% SubTotal = SubTotal + ProductTotal %> <% rs.movenext %> <% loop %> <% rs.close %> <% if SubTotal>=20000 then %> <% discount = SubTotal * 0.10 discount100 = (discount * 100) if discount100 mod 5 <> 0 then discount100 = discount100 + (5 - (discount100 mod 5)) discount = discount100 / 100 end if %> <% end if %> <% if Accessories5 = true then select case postagetype case 0: postageamount = AUpostage1 case 1: postageamount = NZpostage1 case 2: postageamount = USpostage1 case 3: postageamount = OTpostage1 end select else select case postagetype case 0: postageamount = AUpostage2 case 1: postageamount = NZpostage2 case 2: postageamount = USpostage2 case 3: postageamount = OTpostage2 end select end if %> <% Total = SubTotal + postageamount %>

Description	Quantity	Each	Price
<%=rs("ProductName")%> - <%=rs("ProductColour")%>	" /> <% for k=0 to MaxQuantity %> selected<%end if%>><%=k%>   <% next %>	<%=FormatCurrency(rs("ProductPrice"),2)%>	<%=FormatCurrency(ProductTotal,2)%>
	Update Basket
Subtotal			<%=FormatCurrency(SubTotal,2)%>
Less 10% discount			<%=FormatCurrency(discount,2)%>
Ship to: checked="checked"<%end if%> /> Australia    checked="checked"<%end if%> /> NZ    checked="checked"<%end if%> /> USA    checked="checked"<%end if%> /> Other			<%=FormatCurrency(postageamount)%>
Total			<%=FormatCurrency(Total,2)%>
* includes GST of <%=FormatCurrency((Total/11),2)%>

Go to Checkout   <% else %>

Your basket contains no items

<% end if %> Continue Shopping