CEP, Inc. -- Online Order

<%Response.Buffer=TRUE%> <% '----------------- Set Global Variables -------------- Session("RegFileName") = "c:\users\mryan\webreg.txt" Session("LogFile") = "c:\users\mryan\webcom.log" Session("DefaultFile") = "http://www.distributedspreadsheet.com" Session("NextPage") = "https://www.inventiveweb.com/cep/complete.asp" '----------------------------------------------------- 'Create server component Set objdss = Server.CreateObject("webcom.tanweb.1") objdss.LogFile = Session("LogFile") 'Get the IP address ip=Request.ServerVariables("REMOTE_ADDR") sCookieKey=Request.QueryString("fc") sQuantity=Request.QueryString("qty") 'Get the Cookie s1=sCookieKey if Len(s1) > 0 then objdss.Msg1 = "continue.asp - Found cookie of len " + CStr(Len(s1)) objdss.Log objdss.FCookieKey=s1 else objdss.Msg1 = "continue.asp - No cookie found - redirecting to default.htm" objdss.Log 'Response.Redirect(Session("DefaultFile")) end if objdss.Msg1=Session("RegFileName") objdss.DsGetFormInfo '### test DsGetFormInfo to make sure it worked objdss.Msg1 = "In continue.asp IP=" + ip + " CookieKey=" + s1 objdss.Log regname=objdss.FFirstName + " " + objdss.FLastName regcompany =objdss.FCompanyName billaddress=objdss.FAddress1 billzip=objdss.FPostalCode 'Calculate quantity pricing Session("FQuantity") = sQuantity Qty = sQuantity If Qty > 100 Then PriceEach = 6.95 ElseIf Qty > 50 Then PriceEach = 10.95 ElseIf Qty > 20 Then PriceEach = 14.95 Else PriceEach = 19.95 End If Session("FPriceEach") = FormatCurrency(PriceEach) Session("FPrice") = FormatCurrency(Session("FPriceEach") * sQuantity) %> CEP, Inc. -- Online Order












Voice your opinion at the Distributed Spreadsheet blog

The Planning, Budgeting & Forecasting solution that's EASY!

Please enter your desired quantity in the box below. When you click the "Buy Now" button, you will
be redirected to PayPal where you can provide all payment-related information and complete
the transaction.

Single licenses of Distributed Spreadsheet are $19.95.

Quantity Discounts:

1-20 seats: $19.95

21-50 seats: $14.95

51-100 seats: $10.95

101+ seats: $ 6.95

If you are looking to purchase more than 500 seats at a time, please inquire about site license discounts.

Upon completion of the payment process, you will receive the appropriate number of software keys to
unlock Distributed Spreadsheet. These keys will be sent to you via e-mail in 1-2 business days.

Thank you for your patronage.

Communication Enhancement Products, Inc.