Lavenderluscious Day Spa Massage, Facials and Treatments at Blackheath, Blue Mountains, NSW

Lavenderluscious Day Spa, Blackheath, Blue Mountains, NSW

Lavender Cottage and Manor Self Contained Accommodation, Blackheath, Blue Mountains, NSW

<% mySQL="SELECT idCategory,categoryDesc FROM categories WHERE idParentCategory=1 AND idCategory<>1 AND iBTOhide=0 ORDER BY priority, categoryDesc ASC;" set rsCategory=conlayout.execute(mySQL) if err.number <> 0 then response.write " " else if rsCategory.eof then else Do until rsCategory.eof pidCategoryNew = rsCategory("idCategory") pCategoryDescNew = rsCategory("categoryDesc") %>

<%=pCategoryDescNew%>

<% rsCategory.movenext loop set rsCategory=nothing end if end if %>

<% dim vcCartArr, vcCartIndex, v, vcTotal, vcItems vcCartArr=Session("pcCartSession") vcCartIndex=Session("pcCartIndex") vcTotal=Cint(0) 'calculates the cart total vcItems=Cint(0) 'counts items in your cart for v=1 to vcCartIndex if vcCartArr(v,10)=0 then vcItems=vcItems + vcCartArr(v,2) vcTotal=vcTotal+(vcCartArr(v,2)*vcCartArr(v,17)) vcTotal=vcTotal+(vcCartArr(v,2)*vcCartArr(v,5)) vcTotal=vcTotal-vcCartArr(v,30) vcTotal=vcTotal+vcCartArr(v,31) vcTotal=vcTotal-vcCartArr(v,15) 'vcTotal=vcTotal + vcCartArr(v,5) + (vcCartArr(v,3)*vcCartArr(v,2)) end if next %>

Your cart contains:

<%response.write vcItems%> Item(s)

Subtotal: <%response.write scCurSign & money(vcTotal)%>

Checkout >>

Sign-Up for Newsletter

Enter your email address in the email box below, or
Sign in to your existing or create a new account in our on-line shop and opt-in for the newsletter

Current Newsletter

To view our existing newsletter, click here

Links : Privacy Policy : Site Map : A Cameron Solutions Website