vb.net 写的 asp.net 读取指定文件夹里的全部文件

Question

Dim ss As New DirectoryInfo(directorypath)
 dim aa as new arraylist=ss.GetFiles("*.txt")
dim counter as integer
for counter=0 to aa.count-1
dim file as new fileinfo(aa(counter))
response.write(file.length)next

Answer 1

ss.getfiles("*.txt")可以指定类型，如果未空表示全部文件。

Answer 2

to zhanqiangz(闲云野鹤):前面要引入什么命名空间呢？能把前面的引用也写出来吗？比如 System.IO.DirectoryInfo

Answer 3

<%@ Import Namespace="System.IO" %>
<script language="VB" runat="server">
  Sub Page_Load(sender as Object, e as EventArgs)
    Dim dirInfo as New DirectoryInfo(Server.MapPath(""))
    articleList.DataSource = dirInfo.GetFiles("*.aspx")
    articleList.DataBind()
  End Sub
</script>
<asp:DataGrid runat="server" id="articleList" Font-Name="Verdana"
AutoGenerateColumns="False" AlternatingItemStyle-BackColor="#eeeeee"
HeaderStyle-BackColor="Navy" HeaderStyle-ForeColor="White"
HeaderStyle-Font-Size="15pt" HeaderStyle-Font-Bold="True">
  <Columns>
    <asp:HyperLinkColumn DataNavigateUrlField="Name" DataTextField="Name" HeaderText="File Name" />
    <asp:BoundColumn DataField="LastWriteTime" HeaderText="Last Write Time"
        ItemStyle-HorizontalAlign="Center" DataFormatString="{0:d}" />
    <asp:BoundColumn DataField="Length" HeaderText="File Size"
ItemStyle-HorizontalAlign="Right" DataFormatString="{0:#,### bytes}" />
  </Columns>
</asp:DataGrid>