在.Net中使用FTP（08.12.19新增源代码）

 

最近在CSDN上发现有些朋友询问在.Net中使用FTP传送文件的问题，以前自己也曾遇到同样的困扰，后来找了个FTP组件并改进了一下，所需功能都实现了：

在需要用FTP上传的场合（如多台WebServer做LoadBalance，一台FileServer+磁盘陈列存放文件），.Net本身自带的HttpPostedFile类已无法处理，因为你无法预知用户的访问请求被定向到哪个WebServer上，如果还用内置的处理方式，则文件会被保存在其中一台WebServer上，当用户请求下载文件时，就可能会发生找不到文件的情况。

解决方案：在文件服务器上运行FTP服务，文件上传采用FTP方式传到FileServer上，下载时通过文件服务器的Http服务或通过WebServer上映射的虚拟目录进行。这样就可做到与WebServer的无关性。

具体做法：

1、  下载Ftp支持库https://files.cnblogs.com/liubr/FtpSupport.rar，解压到bin目录

2、  在Project中添加引用FtpSupport.dll

3、  代码中Imports/using FtpSupport
ASPX文件中：

             

<form id="Form1" method="post" encType="multipart/form-data" runat="server">

                     <INPUT id="fileUp" type="file" runat="server"> 

                     <asp:Button id="Button1" runat="server" Text="Button"></asp:Button>

</form>

       以上代码不用解释了吧

 

       后台代码中(VB)：

      

Imports FtpSupport
       ……
Dim FileSplit() As String = Split(fileUp.PostedFile.FileName, "\")
Dim FileName As String = FileSplit(FileSplit.Length - 1)
Dim FtpServer As String = ConfigurationSettings.AppSettings("ftpServer")
Dim userID As String = ConfigurationSettings.AppSettings("userID")
Dim passWord As String = ConfigurationSettings.AppSettings("password")
Dim directory As String = ConfigurationSettings.AppSettings("directory")
Dim ftp As New FtpConnection(FtpServer, userID, passWord)  ‘创建FTP链接
Dim stream As Stream
stream = fileUp.PostedFile.InputStream               ‘ 取得上传的文件流
ftp.SetCurrentDirectory(directory)                            ‘ 转到需上传的FTP目录
ftp.PutStream(stream, FileName)                           ‘ 将文件传到FTP服务器
stream.Close()
ftp.Close()

FtpSupport类的详细说明没写，根据提示可以很容易理解。包括判断文件、目录是否存在，创建、删除FTP目录，以流方式上传文件，直接传送硬盘上的文件（http://www.cnblogs.com/liubr/admin/ftp://ftp.put(源文件/, 目标文件)，注意在WebForm中因程序运行在WebServer，此时源文件实际上是WebServer上的文件，因此需先用HttpPostedFile上传到WebServer）
在WebForm及WinForm中均可使用。

 

2008.12.19：PS：源代码，无偿奉送。