%
' Comersus BackOffice Lite
' e-commerce ASP Open Source
' Comersus Open Technologies LC
' 2005
' http://www.comersus.com
%>
<%
on error resume next
dim mySQL, conntemp, rstemp
pRunInstallationWizard = getSettingKey("pRunInstallationWizard")
pEncryptionMethod = getSettingKey("pEncryptionMethod")
pEncryptionPassword = getSettingKey("pEncryptionPassword")
if pRunInstallationWizard<>"-1" then
response.redirect "comersus_backoffice_message.asp?message="&Server.UrlEncode("Sorry, the Installation Wizard is disabled")
end if
pPowerPacksInstalled=request.form("pPowerPacksInstalled")
' reset all settings
mySQL="UPDATE settings SET settingValue='0' WHERE settingKey='pEmailToFriend'"
call updateDatabase(mySQL, rstemp, "comersus_backoffice_install10.asp")
mySQL="UPDATE settings SET settingValue='0' WHERE settingKey='pForgotPassword'"
call updateDatabase(mySQL, rstemp, "comersus_backoffice_install10.asp")
mySQL="UPDATE settings SET settingValue='none' WHERE settingKey='pCurrencyConversion'"
call updateDatabase(mySQL, rstemp, "comersus_backoffice_install10.asp")
mySQL="UPDATE settings SET settingValue='0' WHERE settingKey='pNewsLetter'"
call updateDatabase(mySQL, rstemp, "comersus_backoffice_install10.asp")
mySQL="UPDATE settings SET settingValue='0' WHERE settingKey='pProductReviews'"
call updateDatabase(mySQL, rstemp, "comersus_backoffice_install10.asp")
mySQL="UPDATE settings SET settingValue='0' WHERE settingKey='pRelatedProducts'"
call updateDatabase(mySQL, rstemp, "comersus_backoffice_install10.asp")
mySQL="UPDATE settings SET settingValue='0' WHERE settingKey='pAuctions'"
call updateDatabase(mySQL, rstemp, "comersus_backoffice_install10.asp")
mySQL="UPDATE settings SET settingValue='0' WHERE settingKey='pDownloadDigitalGoods'"
call updateDatabase(mySQL, rstemp, "comersus_backoffice_install10.asp")
mySQL="UPDATE settings SET settingValue='0' WHERE settingKey='pRecommendations'"
call updateDatabase(mySQL, rstemp, "comersus_backoffice_install10.asp")
mySQL="UPDATE settings SET settingValue='0' WHERE settingKey='pAffiliatesStoreFront'"
call updateDatabase(mySQL, rstemp, "comersus_backoffice_install10.asp")
mySQL="UPDATE settings SET settingValue='0' WHERE settingKey='pCompareProducts'"
call updateDatabase(mySQL, rstemp, "comersus_backoffice_install10.asp")
mySQL="UPDATE settings SET settingValue='0' WHERE settingKey='pRssFeedServer'"
call updateDatabase(mySQL, rstemp, "comersus_backoffice_install10.asp")
mySQL="UPDATE settings SET settingValue='0' WHERE settingKey='pSuppliersList'"
call updateDatabase(mySQL, rstemp, "comersus_backoffice_install10.asp")
mySQL="UPDATE settings SET settingValue='0' WHERE settingKey='pAllowDelayPayment'"
call updateDatabase(mySQL, rstemp, "comersus_backoffice_install10.asp")
if pPowerPacksInstalled="PPM" or pPowerPacksInstalled="PPP" then
mySQL="UPDATE settings SET settingValue='-1' WHERE settingKey='pEmailToFriend'"
call updateDatabase(mySQL, rstemp, "comersus_backoffice_install10.asp")
mySQL="UPDATE settings SET settingValue='-1' WHERE settingKey='pForgotPassword'"
call updateDatabase(mySQL, rstemp, "comersus_backoffice_install10.asp")
mySQL="UPDATE settings SET settingValue='static' WHERE settingKey='pCurrencyConversion'"
call updateDatabase(mySQL, rstemp, "comersus_backoffice_install10.asp")
mySQL="UPDATE settings SET settingValue='-1' WHERE settingKey='pAllowDelayPayment'"
call updateDatabase(mySQL, rstemp, "comersus_backoffice_install10.asp")
end if
if pPowerPacksInstalled="PPM" or pPowerPacksInstalled="PPP" then
mySQL="UPDATE settings SET settingValue='-1' WHERE settingKey='pNewsLetter'"
call updateDatabase(mySQL, rstemp, "comersus_backoffice_install10.asp")
mySQL="UPDATE settings SET settingValue='-1' WHERE settingKey='pProductReviews'"
call updateDatabase(mySQL, rstemp, "comersus_backoffice_install10.asp")
mySQL="UPDATE settings SET settingValue='-1' WHERE settingKey='pRelatedProducts'"
call updateDatabase(mySQL, rstemp, "comersus_backoffice_install10.asp")
mySQL="UPDATE settings SET settingValue='-1' WHERE settingKey='pAffiliatesStoreFront'"
call updateDatabase(mySQL, rstemp, "comersus_backoffice_install10.asp")
mySQL="UPDATE settings SET settingValue='-1' WHERE settingKey='pCompareProducts'"
call updateDatabase(mySQL, rstemp, "comersus_backoffice_install10.asp")
mySQL="UPDATE settings SET settingValue='-1' WHERE settingKey='pSuppliersList'"
call updateDatabase(mySQL, rstemp, "comersus_backoffice_install10.asp")
end if
if pPowerPacksInstalled="PPP" then
mySQL="UPDATE settings SET settingValue='-1' WHERE settingKey='pAuctions'"
call updateDatabase(mySQL, rstemp, "comersus_backoffice_install10.asp")
mySQL="UPDATE settings SET settingValue='-1' WHERE settingKey='pDownloadDigitalGoods'"
call updateDatabase(mySQL, rstemp, "comersus_backoffice_install10.asp")
mySQL="UPDATE settings SET settingValue='-1' WHERE settingKey='pRecommendations'"
call updateDatabase(mySQL, rstemp, "comersus_backoffice_install10.asp")
mySQL="UPDATE settings SET settingValue='-1' WHERE settingKey='pRssFeedServer'"
call updateDatabase(mySQL, rstemp, "comersus_backoffice_install10.asp")
end if
pPassword =Cstr(EnCrypt("123456", pEncryptionPassword))
' enter demo customer
mySQL="INSERT INTO customers (name, lastName, customerCompany, phone, email, password, address, zip, stateCode, city, countryCode, active, idCustomerType) VALUES ('John','Doe','Comersus','305 735 8008','test@comersus.com','"&pPassword&"','8345 NW 66 ST 3537','33166','FL','Miami','US',-1,1)"
call updateDatabase(mySQL, rstemp, "comersus_backoffice_install10.asp")
' disable Wizard
mySQL="UPDATE settings SET settingValue='0' WHERE settingKey='pRunInstallationWizard'"
call updateDatabase(mySQL, rstemp, "comersus_backoffice_install10.asp")
' login admin
session("admin") = 1
%>
Installation Wizard
You have completed the wizard!
Things you can do now:
1. Add your own categories
2. Add your own products
3. Test the store
4. Request free technical assistance
5. Purchase Power Packs to increase functionality