<%dim fso,fsofolder,fsocontent,fsocount%>
<%set fso=createobject("scripting.filesystemobject")%>
<%set fsofolder=fso.getfolder(server.mappath(""&webroot&"theme/"&folder))%>
<%set fsocontent=fsofolder.files%>
<%for each fsocount in fsofolder.subfolders%>
<%if lcase(fsocount.name)<>"block" then%>
 "><%=fsocount.name%> |
|
<%=formatnumber(fsocount.size/1024,2,true,false,true)%> KB |
<%=fsocount.datelastmodified%> |
<%end if%>
<%next%>
<%dim fsoitem%>
<%for each fsoitem in fsocontent%>
<%edittype=false%>
<%picsrc=""%>
<%call check_file(right(fsoitem.name,3))%>
<%if lcase(fsoitem.name)<>"config.asp" and lcase(fsoitem.name)<>"base.asp" and lcase(fsoitem.name)<>"config.xml" then%>
<%dim name:name=fsoitem.name%>
 <%else%>{webroot}theme/<%=folder&"/"&fsoitem.name%><%end if%>" <%if not edittype then%>title="查看詳細" target="_blank"<%end if%>><%=fsoitem.name%> |
<%=getblockname(replace(folder&"/"&name,theme_root&"/",""))%> |
<%=formatnumber(fsoitem.size/1024,2,true,false,true)%> KB |
<%=fsoitem.datelastmodified%> |
<%end if:next%>
<%set fso=nothing%>
<%set fsofolder=nothing%>
<%set fsocontent=nothing%>