<% ' Comersus 4.2x Sophisticated Cart ' Comersus Open Technologies ' United States ' Software License can be found at License.txt ' http://www.comersus.com ' Details: verifies if cart is empty in order to allow userauthenticateform and display first userauthenticateform screen %> <% dim mySQL, connTemp, rsTemp on error resume next pIdCustomer = getSessionVariable("idCustomer",0) if pIdCustomer<>0 then response.redirect "comersus_customerUtilitiesMenu.asp" end if ' get settings pStoreFrontDemoMode = getSettingKey("pStoreFrontDemoMode") pCurrencySign = getSettingKey("pCurrencySign") pDecimalSign = getSettingKey("pDecimalSign") pCompany = getSettingKey("pCompany") pCompanySlogan = getSettingKey("pCompanySlogan") pHeaderKeywords = getSettingKey("pHeaderKeywords") pAuctions = getSettingKey("pAuctions") pListBestSellers = getSettingKey("pListBestSellers") pNewsLetter = getSettingKey("pNewsLetter") pPriceList = getSettingKey("pPriceList") pStoreNews = getSettingKey("pStoreNews") pOneStepCheckout = getSettingKey("pOneStepCheckout") pForgotPassword = getSettingKey("pForgotPassword") pAllowNewCustomer = getSettingKey("pAllowNewCustomer") pRedirect = getUserInputL(request.querystring("redirect"),20) pIdProduct = getUserInputL(request.querystring("idProduct"),20) %>

<%=getMsg(136,"Login")%>

<%end if%>

<%=getMsg(137,"Em")%>	<%if pStoreFrontDemoMode="-1" then%> <%else%> <%end if%>
<%=getMsg(138,"Pwd")%>	<%if pStoreFrontDemoMode="-1" then%> <%else%> <%end if%>
">	<%if pAllowNewCustomer="-1" then%> <%=getMsg(140,"Not a member")%>  <%=getMsg(141,"Here")%> <%end if%> <%if pForgotPassword="-1" then%> <%=getMsg(142,"Forgot")%> <%=getMsg(143,"Here")%>

<%call closeDb()%>