%
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 ("&".jpg)
| ")
NEXT
response.write ("&".jpg)
| ")
end if
else
response.write "No image"
end if
%>
| Size |
<%= rs.fields("size") %> |
| Type |
<%
if rs.fields("decal")="y" then
response.write(""&rs.fields("type")&" (with Decal) | ")
else
response.write(""&rs.fields("type")&" (without Decal) | ")
end if
%>
| Color |
<%= rs.fields("color") %> |
| Features |
<%= rs.fields("feature") %>
|
<%
if rs.fields("racer")<> "" then
response.write("| Racer | ")
response.write(""&rs.fields("racer")&" | ")
end if
%>
| M.R.P
Price (Rupees) |
<%= rs.fields("price") %> |
|