<% ' 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") if pRunInstallationWizard<>"-1" then response.redirect "comersus_backoffice_message.asp?message="&Server.UrlEncode("Sorry, the Installation Wizard is disabled") end if pEncryptionPassword =request.form("pEncryptionPassword") if pEncryptionPassword<>"" then mySQL1="UPDATE settings SET settingValue='" &pEncryptionPassword& "' WHERE settingKey='pEncryptionPassword' AND idStore="&pIdStore call updateDatabase(mySQL1, rstemp, "comersus_backoffice_install.asp") ' update admin profile with new password pAdminPassword =request.form("pAdminPassword") if pAdminPassword="" then pAdminPassword="123456" pEncryptedAdminPassword =Cstr(EnCrypt(pAdminPassword, pEncryptionPassword)) ' clear previous admins mySQL1="DELETE FROM admins" call updateDatabase(mySQL1, rstemp, "comersus_backoffice_install.asp") ' insert into admins mySQL1="INSERT INTO admins (adminName, adminLevel, adminPassword, idStore) VALUES ('Admin',0,'" &pEncryptedAdminPassword& "'," &pIdStore& ")" call updateDatabase(mySQL1, rstemp, "comersus_backoffice_install.asp") end if %>
Installation Wizard

Step 9 - Power Packs

Power Packs Installed (1)
   


Additional information
(1) With Power Packs you can obtain advanced features for your store. More information here...