<% cnt = 0 kk = "" For each qsparam in Request.QueryString cnt = cnt+1 if cnt > 0 then kk = kk+qsparam+"," end if Next kk = left(kk,len(kk)-1) %> <% if IsObject(Session("steel_con")) then Set Conn=Session("steel_con") Else Set conn= Server.CreateObject("ADODB.Connection") conn.open "sbh","","" Set Session("steel_con")=conn end if sql="select * from steel where id like '"&kk&"'" Set RS = Server.CreateObject("ADODB.RecordSet") RS.Open sql, Conn, 3,3 %>

.jpg" name="main">

<%= rs.fields("name") %>

 

<% if rs.fields("image_s") <> "" then imgs = rs.fields("image_s") imgs1=Split(imgs,",") imgsmax=ubound(imgs1) if imgsmax <> 0 then For cnt=0 to imgsmax-1 response.write ("") NEXT response.write ("") end if else response.write "No image" end if %>

<% if rs.fields("decal")="y" then response.write("") else response.write("") end if %> <% if rs.fields("racer")<> "" then response.write("") response.write("") end if %>
Size <%= rs.fields("size") %>
Type"&rs.fields("type")&" (with Decal)"&rs.fields("type")&" (without Decal)
Color
<%= rs.fields("color") %>
Features <%= rs.fields("feature") %>
Racer"&rs.fields("racer")&"
M.R.P Price (Rupees) <%= rs.fields("price") %>