<% '''''''''''''''''''''''''''''''''''''''''''''''''''''''''' '' Copyright 2002-2005 by Robert Aung. '' '' All rights reserved. No part of this work may be '' reproduced, stored, or transmitted in any form, '' without prior written permission. '' '' Neither this page, nor any part of it, may be '' modified, copied, distributed, displayed, reproduced, '' published, licensed, sold, placed on a web site, '' or used to create derivitive works without the '' express written consent of the author. Any use '' of this page is subject to the terms of a license '' agreement with the author. '' '' To obtain a license for this software, contact the '' author at robert.aung@verizon.net. '''''''''''''''''''''''''''''''''''''''''''''''''''''''''' dim cn, rs, cmd set cn = server.CreateObject("ADODB.Connection") set rs = server.CreateObject("ADODB.Recordset") set cmd = server.CreateObject("ADODB.Command") cn.ConnectionString = connectstring cn.Open if cn.State = 1 then cmd.activeconnection = cn cmd.commandtext = "select * from book_order_2004 where book_order_id=? and magic=?" cmd(0) = request.querystring("book_order_id") cmd(1) = request.querystring("magic") set rs.source = cmd rs.open if not (rs.eof and rs.bof) then %> iNEER - International Network for Engineering Education & Research

Order Confirmation & Payment

To complete your order, please make payment for the amount due by one of the methods listed below.

<% dim wirefee wirefee = 0 if rs("paymenttype") = "wire" then wirefee = 12 %> <% end if %>
Quantity: <%=rs("quantity")%> @ US $<%=rs("itemcost")%> each
Subtotal: US $<%=rs("subtotal")%>
Shipping Type: <% if rs("shiptype") = "US" then response.write "Continental US" elseif rs("shiptype") = "AIR" then response.write "Airmail outside continental US" elseif rs("shiptype") = "SURFACE" then response.write "Surface mail outside continental US" else response.write "Special arrangement" end if %>
Shipping & Handling: <% dim q q = rs("quantity") if rs("shiptype") = "US" then response.write q & " @ US $10 each" elseif rs("shiptype") = "AIR" then response.write q & " @ US $30 each" elseif rs("shiptype") = "SURFACE" then response.write q & " @ US $7.50 each" else response.write "US $" & CCur(rs("shipcost")) end if %>
Shipping Subtotal: US $<%=rs("shipcost")%>
Wire Transfer Fee: US $12.00
GRAND TOTAL: US $<%=rs("subtotal")+rs("shipcost")+wirefee%>

Method A: Online Credit Card Payment
<% Randomize dim sequence, ret sequence = Int(1000 * Rnd) ret = InsertFP (loginid, txnkey, rs("subtotal")+rs("shipcost"), sequence) %>
"> "> "> "> "> "> "> "> "> "> "> "> "> "> "> "> "> "> "> ">

  1. All payments must be in U.S. dollars, net of any currency conversion fee levied by your bank.
  2. Click the "Pay" button above to be directed to a secure payment form at our credit card processor's website that that will collect your credit card details, and your credit card will be billed for the amount indicated above.

Method B: Paypal Payment

If you have not already done so, sign up for a Paypal account. Follow the instructions on the Paypal website to make an online payment to iNEER. When prompted for the recipeint's e-mail address, use ineer@ineer.org.

Method C: Check (Bank must be located in U.S.A.)

Send check or bank draft payable to "iNEER" to:

iNEER, 10817 Willow Run Court, Potomac, MD 20854, U.S.A.

Please note the name of the payer on the check. Please send an e-mail to ineer@ineer.org indicating that you are using this option.

Method D: Wire/Bank Transfer

Make payment to: Wells Fargo Bank, 10305 Westlake Drive, Bethesda, MD 20817, USA, Account number: PNBPUS33-2000003770128 (international transfer). Wells Fargo Bank information: PNBPUS33 (SWIFT), 051400549 (ABA). Funds must be in US dollars, net of currency conversion fees. Add US$12 for iNEER bank charges for each transfer. To avoid payment of additional bank charges, be sure total net payment ammount is correct the first time.

NOTE: Please be sure to include your name, institution, and reason for payment on your transfer. Significant delays may result if this information is not included.

Notify iNEER via e-mail at ineer@ineer.org, and send a copy of remittance to:

iNEER, 10817 Willow Run Court, Potomac, MD 20854, U.S.A.

<% else response.write "Invalid order specified." end if else response.write "There was an error connecting to the database server." end if %>