<% set objRS = Server.CreateObject("ADODB.Recordset") 'sql="SELECT * from tender where date() <= ldate order by ldate " sql="select SNO,Subject,Format(GivenDate ,'dd/MM/yyyy') as GivenDate,TenderRefNo,pdffile from tenderAward where status='A' order by SNO desc" objRS.open sql, objConn,3,1,1 %> <% dim sl sl = 0 On Error Resume Next objRS.MoveFirst do while Not objRS.eof sl = sl + 1 %> <% objRs.movenext loop objRS.close %>

Sl No	Tender Title	Contract Date	Tender Reference No	Details of tender / contracts
<%Response.write(sl)%>	"><%=Server.HTMLEncode(objRS.Fields("Subject"))%>	<%=Server.HTMLEncode(objRS.Fields("GivenDate").Value)%>	<%=Server.HTMLEncode(objRS.Fields("TenderRefNo").Value)%>	">See Pdf File