<!--#include file="../checkLogin.asp"-->
<!--#include file="../SQLconn.asp"-->
<html>
<head>
<title>菜单</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">

<link rel="stylesheet" type="text/css" href="../css/style.css" />
<style type="text/css">
<!--
body {
	background-image: url(../images/<%=request.cookies("imgdir")%>/nemu/bg.gif);
	margin-left: 13px;
}
a:link {
	color: #000000;
}
a:visited {
	color: #000000;
}
a:hover {
	color: #FF0000;
}
a:active {
	color: #FF0000;
}
-->
</style></head>
<body class="bodycolor" topmargin="5" style="overflow-x: hidden">
	
<br>
 <table width="140" border="0" align="center" cellpadding="0" cellspacing="0">
    <%
nemu1=request("nemu1")
	   %>
	   
	   <tr><td height="18" align="center" nowrap background="../images/<%=request.cookies("imgdir")%>/nemu/begin.gif" class="STYLE1">&nbsp;</td></tr> 
	   
	 <tr>
      <td  height="22" style="background: url(../images/<%=request.cookies("imgdir")%>/nemu/bar.jpg) no-repeat center center;" ><div   class="STYLENemu"  align="center"><a href="nemu.asp?nemu1=科研文件" >科研文件</a></div></td>
    </tr>
	<%if  nemu1="科研文件" then %>
    <tr>
      <td>
	  <table width="140" border="0" align="center" cellpadding="0" cellspacing="0">
        <%
   
   Set Rslist=Server.CreateObject("Adodb.Recordset")
   sqllist="select vname from  varset where name='keyantype' order by vid" 
   Rslist.open sqllist,conn,1,1
   
   %>
<%while not Rslist.eof and not Rslist.bof
%>
    <tr>
     
      <td   height="30" align="center" nowrap class="STYLE1"><div align="right" class="STYLE1">
        <div align="center">- <a  href="filelist.asp?Ftype=<%=Rslist( "vname" )%>" target=rightFrame><%=Rslist("vname")%></a></div>
      </div></td>
    </tr>
<%  Rslist.movenext
    wend
%>
      </table></td>
    </tr>
	 <%end if %>
	   
	   
	   
	   
	   
	   
    <tr>
      <td   height="22" style="background: url(../images/<%=request.cookies("imgdir")%>/nemu/bar.jpg) no-repeat center center;" ><div   class="STYLENemu"  align="center"><a href="nemu.asp?nemu1=论坛管理">文件管理</a> </div></td>
    </tr>
    <%if  nemu1="论坛管理" then %>
    <tr>
      <td>
	 <!-- 、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、-->
			 <table width="140" border="0" align="center" cellpadding="0" cellspacing="0">		  
				 
				<tr>
				   <td height="38" align="center" nowrap class="STYLE1"><div align="center">- <a href="addfile.asp" target="rightFrame">发布文件</a></div></td>
				 </tr>
				 <tr>
				   <td height="30" align="center" nowrap class="STYLE1"><div align="center">- <a href="find.asp" target="rightFrame">文件查询</a></div></td>
				 </tr>
				 <tr>
				   <td height="30" align="center" nowrap class="STYLE1"><div align="center">- <a href="manage.asp?years=<%=Years%>" target="rightFrame">文件管理</a></div></td>
			    </tr>
        </table>	 
		 <!-- 、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、、-->	    </td>
    </tr>
	  <%end if %>
	  
 
      
    <tr>
      <td  height="22" style="background: url(../images/<%=request.cookies("imgdir")%>/nemu/bar.jpg) no-repeat center center;" ><div   class="STYLENemu"  align="center"><a href="../OAindex.asp" target="_parent">返回首页</a><a href="../default.asp" target="_parent" class="STYLE1"></a></div></td>
    </tr>
    
	<tr>      <td height="18" background="../images/<%=request.cookies("imgdir")%>/nemu/end.gif">&nbsp;</td>    </tr>
</table>
   <%
		 
	    Set MyOAASPObj = Server.CreateObject("YFSchoolOApro.YFSchoolDll")
            MyOAASPObj.YFideacom
	    set MyOAASPObj=nothing	
		   	   
		   %> 
</body>
</html>