<%set con = server.createobject("adodb.connection") con.open Datasource set rs = server.createobject("adodb.recordset") set rs1 = server.createobject("adodb.recordset") set rs10 = server.createobject("adodb.recordset")%>
  JayaBahetiart in the News  
     
  <%If py<>"" or py<>0 then rs.open "select count(*) from tblpublications where pyear='"&py&"'",con mycount=rs(0) rs.close If mycount>0 Then rs.open "select * from tblpublications where pyear='"&py&"' order by pid desc",con view_count=1 do while not rs.EOF linetxt=rs("description")%> <% If CStr(view_count) = request.Form("vcount") Then rs1.open"select * from tblpublications where pid='"&request.Form("view2")&"'",con%> <%rs1.close End if%> <%view_count=view_count+1 rs.MoveNext loop rs.close%> <%Else%> <%End If%> <% End if%>
Publication Year
<%py=request.Form("pastyear") if py="" then py=1900 end if%>
Title: <%=rs("title")%>
Date: <%=rs("pday")%>-<%=rs("pmonth")%>-<%=rs("pyear")%>
Description: <%=linetxt%>
,<%=view_count%>)">more
<%If rs1("path1")<>"" then%>" width=75 height=75 border=0 onclick="myFull(<%=rs1("pid")%>,1);return false"><%end if%>
 
No Publictions available for this year
 
   
 
     
<%con.close%>