<% v_BrandID =request("txtbrandid") v_Pic1 =request("txtpic1") v_ProdID = request("prod_id") v_Email = request("txtemail") v_Name = request("txtname") v_Phone = request("txtnumber") v_UserEmail = Request.Cookies("cUEmail") Set DBConn = Server.CreateObject("ADODB.Connection") Set ItemRs = Server.Createobject("ADODB.Recordset") DBConn.Open Session("DSN") Sql = "select p.*,b.* from products_colors p,brands b where p.brand_id = b.brand_id and p.product_id =" & v_ProdID ItemRs.open Sql,DBconn v_ProdName = ItemRs.Fields("product_n") v_ColorCode = Itemrs.Fields("color_code_n") v_WhereisSlash = instr(1,ItemRs.Fields("color_name"),"/") v_LenseColor = left(ItemRs.Fields("color_name"),v_WhereisSlash-1) v_FrameColor = mid(ItemRs.Fields("color_name"),v_WhereisSlash+1,len(ItemRs.Fields("color_name"))) %>

Whether you're looking to discuss offer status or you are looking to learn more about <%=SESSION("WebSiteName")%> our dedicated team of Sales Specialists will help you with everything your heart desires. With a wealth of experience and extensive knowledge of our products our team will ensure that your requirements are met and your expectations exceeded.

Product Information:
Brand:   <%=itemrs.Fields("brand_n")%>
Model:   <%=itemrs.Fields("product_n")%>
Color Code:   <%=itemrs.Fields("color_code_n")%>
Lense Color:   <%=v_LenseColor%>
Frame Color:   <%=v_FrameColor + " " + StrSwarovsky%>
"> ">
Please enter the following:
Email Address:
Name:
Phone # (U.S.A & Canada):
Impatient?
Dont want to wait?
Want answers now?

Call them now at <%=SESSION("WebSitePhone")%>

You may also email them at <%=SESSION("WebSiteEmail")%>