CyberStrong ASP Shopping Cart Software
"I just did a Miva install for another client, and I think that your eShop is faster and easier to use." Roger, IN
Home
Features
Online Demo
Free Trial
Customer Sites
Requirements
Customization
Source Code
FAQs
Quotes
Advanced Reports 
Advanced Taxes
Coupons
Cross Selling
Customer Login
Discounting
eDelivery
Exporting
Gift Cards
Live Inventory
Payment Services
Search Engines
Shipping
Price List
Purchase
Installation
VAR Program
Affiliates
Hosting
Support
Contact Us
CyberStrong eList  
CyberStrong eLink  
CyberStrong eHelp  
  Source Code

CyberStrong eShop shopping cart software is supplied with full source code. Written in Visual Basic Script for Active Server Pages (ASP), CyberStrong eShop is easy to modify and/or extend.

You will find our code well written, modular and with lots of comments. Functions are short, to the point, and use long descriptive names. Each function has a brief synopsis above it. We have standardized routines for common tasks such as form button display and processing. We make only judicious use of global and session variables. As a demonstration of the quality of our source code, many of our clients have already successfully modified our code to customize their own CyberStrong eShop. Please see the sample sites page on this Web site for examples.

Here are just a few of the benefits you will enjoy while working with our source code.

  • Our code is written by experienced programmers, not Web designers.
  • Each page is totally self contained. ASP code and display HTML code share the same file for easy maintenance.
  • Common functions are stored in "include" files for easy project-wide delivery and maintenance.
  • Includes a generic database table editor.
  • Over 25,000 lines of professionally written code.

Here is a small sample of our source code.

'----------------------------------------------
' Handle form events here ...
'

ButtonPress = LCase(GetFormAction())

Select Case True

    Case ButtonPress = "login"
        iPass = 2
        Call RetrieveCustomer()

    Case ButtonPress = "continue"
        iPass = 2
        Call AddUpdateCustomer()

        If (FormErrorMsg = "") Then
            Session(sesCustomerID) = CustomerID
            ConnClose()
            Response.Redirect("40GetShp.asp")
        End If

    Case Request.QueryString("Cancel") = "1"
        iPass = 2
        ConnClose()
        Session.Abandon
        Response.Redirect(NonSecureURL(cstCancelURL))

    Case ButtonPress = ""
        ' First form load, set it up ...
        iPass = 1

    Case Else
        <form error processing ...>

End Select

space8X2.gif (812 bytes)