<html> <head> <title>Active Project List</title> <STYLE> DIV.columnheading {COLOR:#103910; FONT:13PT;FONT-WEIGHT:BOLD} </STYLE> <body bgColor="White"><!--msnavigation--> <!--H2> This Page and the following pages under this is still under construction </H2--> <form name="thisForm" METHOD="post"> <table border="0" cellpadding="0" cellspacing="0" width="100%"> <tr><td valign="top" width="1%"> <p>&nbsp;</p> <p>&nbsp;</p> <p>&nbsp;</p> <p>&nbsp;</p> <p>&nbsp;</p> <!--IMAGES--> <% server.execute("/ars/leftbar2.htm") %> </td><td valign="top" width="24"></td><!--msnavigation--><td valign="top"> <p align="center"><img border="0" height="73" src="../images/annualrept.bmp" width="639"></p> <p align="center">&nbsp;</p> <p align="left"></p> <p> Please select an Experiment to Report </p> <% 'CREATE RECORDSET and CONNECTION 'create the connection and recordset objects set myConnection = server.createobject("ADODB.Connection") set rsProposal = server.CreateObject("ADODB.Recordset") 'open the connection 'myConnection.open "DSN=sgslterdb" myConnection.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\users\cwis532\DATABASE\sgs_dev6.2nekv3.mdb" 'prepare the recordset rsProposal.CursorType = adOpenStatic 'open recordset set rsProposal = myConnection.execute("select * from ArsProjects where Status = 'Active' order by ARSProjNmbr desc") rsProposal.movefirst 'CREATE RESEARCH TITLE LINKS and DISPLAY PI's NAME, ETC. %> <P> <TABLE> <TR> <TD width = 37%><DIV CLASS=columnheading>Title</div></td> <TD width = 5%>&nbsp;</td> <TD align = "right"><DIV CLASS=columnheading>Exp.#</div></td> <TD width = 8%>&nbsp;</td> <TD align = "left" width=21%><DIV CLASS=columnheading>Principal Investigator</div></td> <TD width = 5%>&nbsp;</td> <TD align = "left" width=21%><DIV CLASS=columnheading>CO-PI</div></td> </TR> <TR><TD><HR></TD><TD>&nbsp;</TD><TD><HR></TD><TD>&nbsp;</TD><TD><HR></TD><TD>&nbsp;</TD><TD><HR></TD></TR> <TR> <TD>&nbsp;</TD> </TR> <% Do While Not rsProposal.EOF %> <TR> <TD width = 37%><a HREF="AnnualReportForm1.asp?ARSProjNmbr=<%=rsProposal("ARSProjNmbr")%>"><% response.write(rsProposal("Title"))%></a></td> <TD width = 5%>&nbsp;</td> <TD align = "right"><% response.write(rsProposal("ARSProjNmbr"))%></td> <TD width = 8%>&nbsp;</td> <TD align = "left" width=21%><% response.write(rsProposal("PIDesc"))%></td> <TD width = 5%>&nbsp;</td> <TD align = "left" width=21%><% response.write(rsProposal("COPI"))%></td> </TR> <TR> <TD>&nbsp;</TD> </TR> <% rsProposal.moveNext loop %> </table> </P> <p></p> <p>&nbsp;</p> <p>&nbsp;</p> <!--IMAGES & LINKS--> <!-- p align="center"><map name="FPMap7"> <area href="AdminTsksNOPasswrd.htm" shape="POLY" coords="4,27,27,10,63,4,112,5,156,24,146,37,120,48,77,52,23,44"></map><img border="0" height="58" src="../AdmnTsksBtn.gif" useMap="ReviewPrjctPrpsl.asp#FPMap7" width="162">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; <map name="FPMap1"> <area href="Default.htm" shape="POLY" coords="6,30,12,13,83,5,143,15,154,34,97,52,96,52,26,45"></map><img border="0" height="58" src="../test/HomeBtn.gif" useMap="ReviewPrjctPrpsl.asp#FPMap1" width="162"></p> <hr> <p align="center"><font size="3"><a href="NewExperiment.htm">Initiate A New Experiment</a>&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; <a href="AnnualReport.htm">Complete An Annual Report</a>&nbsp;&nbsp; </font> &nbsp;&nbsp;&nbsp; <font size="3"><a href="MapViews.htm">Map Views</a></font></p> <p align="center"><font size="3"><a href="SearchExprmnts.htm">Search Experiments</a>&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; <a href="AdminTsksNOPasswrd.htm">Administrative Tasks</a>&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp; <a href="Default.htm">Home</a></font></p --> <% server.execute("/ars/footer2.htm") %> </table> </form> </BODY> </html>