<% 'This file is part of ProductCart, an ecommerce application developed and sold by Early Impact LLC. ProductCart, its source code, the ProductCart name and logo are property of Early Impact, LLC. Copyright 2001-2003. All rights reserved. You are not allowed to use, alter, distribute and/or resell any parts of ProductCart's source code without the written consent of Early Impact. To contact Early Impact, please visit www.earlyimpact.com. %> <% response.Buffer=true %> <% validateForm "advSearch_"&bType&".asp" on error resume next If scStoreOff="1" then response.redirect "msg.asp?message=8" End If Dim mySQL, conntemp, rstemp call openDB() if session("idcustomer")="" then session("idPCStore")= scID session("idCustomer")=Cint(0) session("idAffiliate")=Cint(1) session("language")=Cstr("english") session("pcCartIndex")=Cint(0) dim pcCartArray(100,35) session("pcCartSession")=pcCartArray end if if session("idPCStore")<>scID then session.Abandon() session("idPCStore")= scID session("idCustomer")=Cint(0) session("idAffiliate")=Cint(1) session("language")=Cstr("english") session("pcCartIndex")=Cint(0) redim pcCartArray(100,35) session("pcCartSession")=pcCartArray end if %>

<%response.write dictLanguage.Item(Session("language")&"_advSrca_1")%>

<% validateError %> <% 'hide categories? if schideCategory=0 then %> <% end if 'end of hideCategories %> <%mySQL="Select * from Brands order by BrandName asc" set rstemp4=connTemp.execute(mySQL) if not rstemp4.eof then%> <%end if%> <% query="SELECT customfields.idcustom, customfields.custom, customfields.searchable FROM customfields ORDER BY customfields.custom;" set rs=conntemp.execute(query) if not rs.eof then pcv_tempFunc="" pcv_tempFunc=pcv_tempFunc & "" & vbcrlf set rs=nothing %> <%else%> <%end if %>

<%response.write dictLanguage.Item(Session("language")&"_advSrca_2")%>	<% ' get leaf categories from db mySQL="SELECT idcategory,categoryDesc FROM categories WHERE idparentcategory=1 AND idCategory>1 AND iBTOhide=0 ORDER BY categoryDesc" set rs=conntemp.execute(mySQL) %>
<%response.write dictLanguage.Item(Session("language")&"_advSrca_5")%>	<%response.write dictLanguage.Item(Session("language")&"_advSrca_6")%> <%validate "priceFrom", "number"%> <%textbox "priceFrom", "0", 6, "textbox"%> <%response.write dictLanguage.Item(Session("language")&"_advSrca_7")%> <%validate "priceUntil", "number"%> <%textbox "priceUntil", "999999999", 10, "textbox"%>
<%response.write dictLanguage.Item(Session("language")&"_advSrca_8")%>
<%response.write dictLanguage.Item(Session("language")&"_advSrca_11")%>
<%=dictLanguage.Item(Session("language")&"_advSrca_13")%>
<%response.write dictLanguage.Item(Session("language")&"_advSrca_9")%>	<%response.write dictLanguage.Item(Session("language")&"_advSrca_14")%>

<%response.write dictLanguage.Item(Session("language")&"_advSrca_22")%>
<%response.write dictLanguage.Item(Session("language")&"_advSrca_12")%>	<%=pcv_tempFunc%> <%=pcv_tempList%>

<%=dictLanguage.Item(Session("language")&"_advSrca_15")%>
<%=dictLanguage.Item(Session("language")&"_advSrca_16")%>
" border="0" name="Submit" value="<%response.write dictLanguage.Item(Session("language")&"_advSrca_10")%> ">

<% call closeDb() set rstemp= nothing %>