<% 'Generate Credit Card List Do While NOT RSCC.EOF ccOption = ccOption & vbCrLf & "" RSCC.MoveNext Loop %> <% 'Generate State List Do While NOT RSState.EOF stateOption = stateOption & vbCrLf & "" RSState.MoveNext Loop %> <% 'Generate Country List Do While NOT RSCountry.EOF countryOption = countryOption & vbCrLf & "" RSCountry.MoveNext Loop %>
<% If CREDIT = "1" Then %> <% End If %> <% If ECHECK = "1" Then %> <% End If %> <% If PO = "1" Then %> <% End If %> <% If SubscribeMail = "1" Then %> <% Else %> <% End If %>

1<%Else %>0<% End If %>"> PAYMENT INFORMATION

Purchaser Name:  ( Required )
COMPLETE THIS SECTION FOR CREDIT CARD PURCHASES
Card Type: ( Required For Credit Card Purchase )
Credit Card #: ( Required For Credit Card Purchase )
Exp.Date: ( Required for Credit Card Purchase )
COMPLETE THIS SECTION FOR ELECTRONIC CHECK PURCHASES
Bank Name: ( Required for Electronic Check Purchase )
Bank Routing Number: ( Required for Electronic Check Purchase )
Check Number: ( Required for Electronic Check Purchase )
Checking Account Number: ( Required for Electronic Check Purchase )
COMPLETE THIS SECTION FOR PURCHASE ORDER TRANSACTIONS
Purchase Order Number: ( Required for Purchase Orders )

PURCHASER INFORMATION

Company:
Street Address: ( Required )
Apt. or Suite:
City: ( Required )
State: ( Required )
Country ( Required )
Zip:
Telephone: ( Required )
Fax:
E-Mail: ( Required )
Add to Mailing List:
SHIPPING INFORMATION

Name:

Company:

Address:

Apt. or Suite:

City:

State:

Country
Zip
Telephone:

SPECIAL INSTRUCTIONS