Quick Find
 
<%if request.QueryString("catname") = "Scientific and Borosilicate glass ware" then%> <%end if%>
Category : <%=request.QueryString("catname")%>
Please Click Here to Download Movie Clip

<% catcode=request.querystring("catcode") 'get photos of that category set rscatlist = Server.CreateObject("ADODB.Recordset") rscatlist.CursorType = 3 rscatlist.LockType = 3 sql = "select catcode,name,productid,SmallImage from Photos where catcode=" & catcode & "" rscatlist.Open sql,con 'dim rscatlist 'set rscatlist=con.execute("select * from Photos where catcode=" & catcode) if not rscatlist.EOF then no = 0 %> <% while not rscatlist.eof if n mod 3 = 0 then %> <% end if %> <% rscatlist.movenext wend %>
" target="_blank">" width = "165"> <% n= n + 1 %>
<% else response.Write("Image not avilable") end if con.close set con=nothing %>
 
<< Back to Photo Gallery
 
Copyright © BVR India
. All Rights Reserved.