<% Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open dsn %> <%SQLQuery = "SELECT Title,FileName,path,Authors,CorpAuthors,Pubyear,ISBN,JobNum FROM All_Women WHERE SubTopic like'%AG%' AND type like'Programs/Projects' order by title" Set RS_GetTitle= Conn.Execute(SQLQuery) %> <%IF RS_GetTitle.eof then%> <% Else While not RS_GetTitle.eof %>

  • <% if not isnull(RS_GetTitle("authors")) then%><%=RS_GetTitle("authors")%>, <% End If %> <% if not isnull(RS_GetTitle("Pubyear")) then%><%=RS_GetTitle("Pubyear")%>, <% End If %> <% If isnull(RS_GetTitle("FileName")) then%> <%=RS_GetTitle("title")%>,  <% Else %> <%=RS_GetTitle("FileName")%>"><%=RS_GetTitle("title")%> <% End If %> <% if not isnull(RS_GetTitle("CorpAuthors")) then%><%=RS_GetTitle("CorpAuthors")%>, <% End If %> <% if not isnull(RS_GetTitle("ISBN")) then%>ISBN "<%=RS_GetTitle("ISBN")%>", <% End If %> <% if not isnull(RS_GetTitle("JobNum")) then%>JobNum: <%=RS_GetTitle("JobNum")%><% End If %>

    <%RS_GetTitle.MoveNext Wend end if%>

            

    Subcategories 

     

    farm and household management

    land tenure and land management

    sustainable livelihoods

    animal health, animal production, conservation and sustainable use of animal genetic resources

    conservation and sustainable use of plant genetic resources