vb.net - 如何列出 FTP 连接的目录内容

Question

我找不到这方面的教程。在 VB.NET 中，我想做一个命令，例如：

Dim array1() as string = ListFilesInFolder("www.example.com/images")

我知道这可能不会那么简单，但是任何人都可以指出我的教程或任何东西吗？

Answer 1

使用这个免费库http://netftp.codeplex.com/

Imports System.Net
Imports System.Net.FtpClient

Sub Main
    using ftp = new FtpClient()

        ftp.Host = "www.example.com"
        ftp.Credentials = new NetworkCredential("yourFTPUser", "yourFTPPassword")
        ftp.SetWorkingDirectory("/images")
        for each item in ftp.GetListing(ftp.GetWorkingDirectory())

            select case item.Type
                case FtpFileSystemObjectType.Directory:
                    Console.WriteLine("Folder:" + item.FullName)
                case FtpFileSystemObjectType.File:
                    Console.WriteLine("File:" + item.FullName)
            End Select
        Next
    End Using    
End Sub

当然我假设 www.example.com 是一个 FTP 服务器。

重要提示：该库需要完整的Framework 4.0. 您应该转到您的构建页面Project Properties，单击Advanced Options并选择Framework 4.0而不是Framework 4.0 Client Profile

Answer 2

以下方法适用于framework 3.5更高版本，我知道这个问题已有 3 年历史，但我遇到了需要在项目中列出 FTP 目录的情况，所以我通过参考How to: List Directory Contents with FTPframework 3.5编写了以下代码。

Imports System.Net

Dim Dirlist As New List(Of String) 'I prefer List() instead of an array
Dim request As FtpWebRequest = DirectCast(WebRequest.Create("ftp://www.example.com/images"), FtpWebRequest)

request.Method = WebRequestMethods.Ftp.ListDirectory
request.Credentials = New NetworkCredential("USER_NAME", "PASSWORD")

Dim response As FtpWebResponse = DirectCast(request.GetResponse(), FtpWebResponse)
Dim responseStream As Stream = response.GetResponseStream

    Using reader As New StreamReader(responseStream)
          Do While reader.Peek <> -1
             Dirlist.Add(reader.ReadLine)
          Loop
    End Using
response.Close()