listdir.aspx

来自「《精通ASP.NET网络编程》附带实例」· ASPX 代码 · 共 40 行

 <% @Page Language="C#" %>
    <% @Import Namespace="System.IO" %>
    <%
    string strDir2List = Request.QueryString.Get("dir");
    DirectoryInfo thisOne = null;
    try
    {
    thisOne = new DirectoryInfo(strDir2List);
    // 读目录的属性
    Response.Write("<p>Creation: " + 
    thisOne.CreationTime.ToString() + "</p>");
    DirectoryInfo[] subDirectories = thisOne.GetDirectories();
    Response.Write("<ul>");
    for (int i=0; i < subDirectories.Length; i++)
    {
    Response.Write("<li><a href=\"listdir.aspx?dir=");
    Response.Write(Server.UrlEncode(subDirectories[i].FullName));
    Response.Write("\">" + subDirectories[i].Name); 
    Response.Write("</a><br>");
    }
    Response.Write("</ul>");

    FileInfo[] theFiles = thisOne.GetFiles();
    Response.Write("<ul>");
    for (int i=0; i < theFiles.Length; i++)
    {
    Response.Write("<li><a href=\"showfile.aspx?file=");
    Response.Write(Server.UrlEncode(theFiles[i].FullName));
    Response.Write("\">" + theFiles[i].Name);
    Response.Write("</a><br>");
    }
    Response.Write("</ul>");
    }
    catch (Exception e)
    {
    Response.Write("Access not possible, error: <i>");
    Response.Write(e.ToString() + "</i>");
    Response.End();
    }
    %>