<!--文件夾菜單-->
<%
'------------------------------------------------取記錄
'取文件夾信息 （返回rs對象）
'
set rstype=Server.CreateObject("ADODB.RecordSet")
sql="select * from tbioaDownload_sort where ID="&typeid
rstype.open sql,oConn,1,1
if not rstype.eof then
'------------------------------------------------
%>
<img border="0" src="../images/icon_title.gif"> 當(dāng)前文件夾：<%=rstype("name")%>　　　　創(chuàng)建時間:<%=rstype("sdate")%>　　　修改時間:<%=rstype("mdate")%>
<br><br>
<%if manageAuth or returnqx("0402") then%>
<table width="100" border=0 cellspacing="0" cellpadding="0">
  <tr>
    <td width=100><img border="0" src="../images/icon_close.gif" align="left"><a href="file_add.asp?typeid=<%=typeid%>">添加文件</a></td>
  </tr>
</table>
<%end if%>

<%
end if
rstype.close
set rstype=nothing%>