<% '------------------------------------------------取记录 '取文件夹信息 （返回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 '------------------------------------------------ %> 当前文件夹：<%=rstype("name")%>　　　　创建时间:<%=rstype("sdate")%>　　　修改时间:<%=rstype("mdate")%>

<%if manageAuth or returnqx("0402") then%>

添加文件

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