<% mmyes="N" mcategory=request.QueryString("mcat") myear=request.QueryString("myear") if not isnumeric(myear) or myear="" then myear="all" elseif myear=0 then mmyes="Y" end if if ucase(trim(mcategory))="CATEGORY" then mcategory="all" end if %>
SEARCH PROJECTS: By Year By Category <% Set Conn1 = Server.CreateObject("ADODB.Connection") Conn1.Open strcon set rs11=server.createobject("Adodb.recordset") rs11.cursortype=adopenstatic sqltype="select * from type_master where ucase(accounttype)='ARTWORK'" rs11.open sqltype,conn1,2,2 if rs11.bof and rs11.eof then else %> <% end if set conn1=nothing %>
 
 
 
 
   |       |       |   


<% Set Conn1 = Server.CreateObject("ADODB.Connection") Conn1.Open strcon set rs11=server.createobject("Adodb.recordset") rs11.cursortype=adopenstatic sqltype="select * from project_master where ucase(accounttype)='MOVIECLIPS' and ucase(accountart)=ucase('Hassanshareef') order by accountorder" rs11.open sqltype,conn1,2,2 if rs11.bof and rs11.eof then else m=0 while not rs11.eof m=m+1 aname=rs11("accountname") aphoto="./driver/project/"&rs11("Accountphoto") %> <% rs11.movenext wend end if set rs11=nothing set conn1=nothing %>
Sr No. Clip Title
View
<%=m%>
  <%=aname%>