<% ' Retrieve Registration Information sqlString = "SELECT * FROM users " &_ "WHERE user_id=" & userID SET RS = Con.Execute( sqlString ) IF NOT RS.EOF THEN username = RS( "user_username" ) firstname = RS( "user_firstname" ) lastname = RS( "user_lastname" ) email = RS( "user_email" ) street = RS( "user_street" ) street2 = RS( "user_street2" ) city = RS( "user_city" ) state = RS( "user_state" ) country = RS( "user_country" ) zip = RS( "user_zip" ) cctype = RS( "user_cctype" ) END IF ' Check the Shopping Cart is valid IF NOT isArray ( Session( "cart" ) ) THEN CartValid = "False" ELSE localCart = Session( "cart" ) IF localCart( CARTPID, 0 ) = "" THEN CartValid = "False" ELSE CartValid = "True" END IF END IF %> Checkout
Confirm Order
<% IF CartValid = "True" THEN %> Your order will be sent to the following address when payment is received by the method you have indicated. Please review your address and payment preference and click Confirm Order to finish placing your order. <%ELSE%> Sorry your shopping cart has expired. Please return and refill your cart. <%END IF%>

Customer Name:
 Name:
Email:

Address Information:
 Street:
        :
   City:
  State: Enter State, Region or "None"
Country:
    Zip:

Payment Information:
Payment Type: Currency:<%=Session ("selected_currency")%>
<% IF CartValid = "True" THEN %>
Credit card payment available

*** Check/Money Order payment only available in AUD ***

<%ELSE%>

<%END IF%>