<% ' 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") if pRunInstallationWizard<>"-1" then response.redirect "comersus_backoffice_message.asp?message="&Server.UrlEncode("Sorry, the Installation Wizard is disabled") end if pByPassShipping =request.form("pByPassShipping") if pByPassShipping<>"" then mySQL1="UPDATE settings SET settingValue='" &pByPassShipping& "' WHERE settingKey='pByPassShipping' AND idStore=" &pIdStore call updateDatabase(mySQL1, rstemp, "comersus_backoffice_install.asp") end if pServiceType1 =request.form("pServiceType1") pWeightFrom1 =request.form("pWeightFrom1") pWeightUntil1 =request.form("pWeightUntil1") pZone1 =request.form("shippingZone1") pShippingAmount1 =request.form("pShippingAmount1") pShippingAmount1 = formatNumberForDb(pShippingAmount1) if pServiceType1<>"" and pWeightFrom1<>"" and pWeightUntil1<>"" and pZone1<>"" and pShippingAmount1<>"" then mySQL1="INSERT INTO shipments (shipmentDesc, weightFrom, weightUntil, idShippingZone, priceToAdd, quantityUntil, priceUntil, idCustomerType, idStore) VALUES ('"&pServiceType1&"'," &pWeightFrom1& "," &pWeightUntil1& ",'" &pZone1& "'," &pShippingAmount1& ",9999,999999, NULL,"&pIdStore&")" call updateDatabase(mySQL1, rstemp, "comersus_backoffice_install.asp") end if pServiceType2 =request.form("pServiceType2") pWeightFrom2 =request.form("pWeightFrom2") pWeightUntil2 =request.form("pWeightUntil2") pZone2 =request.form("shippingZone2") pShippingAmount2 =request.form("pShippingAmount2") pShippingAmount2 = formatNumberForDb(pShippingAmount2) if pServiceType2<>"" and pWeightFrom2<>"" and pWeightUntil2<>"" and pZone2<>"" and pShippingAmount2<>"" then mySQL1="INSERT INTO shipments (shipmentDesc, weightFrom, weightUntil, idShippingZone, priceToAdd, quantityUntil, priceUntil, idCustomerType, idStore) VALUES ('"&pServiceType2&"'," &pWeightFrom2& "," &pWeightUntil2& ",'" &pZone2& "'," &pShippingAmount2& ",9999,999999, NULL,"&pIdStore&")" call updateDatabase(mySQL1, rstemp, "comersus_backoffice_install.asp") end if %>
Installation Wizard

Step 6 - Taxes

Enter the tax percentage for customers located in your State and/or Country: (example 35.5%)	%
Enter the tax percentage for customers located outside your State and/or Country:	%
Select your country	<% ' get CountryCodes mySQL="SELECT countryCode, countryName FROM countryCodes ORDER BY countryName" call getFromDatabase(mySQL, rstemp, "orderForm") %> Select <%do while not rstemp.eof%> "><%=rstemp("countryName")%> <%rstemp.movenext loop%>
Select your state	<%' get stateCodes mySQL="SELECT stateCode, stateName FROM stateCodes ORDER BY stateName" call getFromDatabase(mySQL, rstemp, "orderForm") %> Select <%do while not rstemp.eof%> "><%=rstemp("stateName")%> <%rstemp.movenext loop%>

Note: you can add advanced tax rules using the BackOffice Plus at a later time <%call closeDb()%>