TKFPのファイル一覧取得 |
- 日時: 2013/10/16 15:14
- 名前: youta
- TKFPを使用してFTPサーバ上のファイルの一覧を取得後、そのファイルを
ダウンロードしたいのですが、どうもうまくいきません。
開発環境 Windows7 Professional SP1 Visual Studio 2010 Professional
以下、ソースです。 間違った記述があればご指摘願います。
Dim port As Integer = 21 Dim logon As New BasicFtpLogon(usr, pw) Dim ftp As New FtpClient(logon, srv, port) Dim file As FileInfo
ftp.ConnectionMode = ConnectionModes.Active
Try If ftp.Connect() = True Then ftp.ListType = ListType.LIST ftp.ListCacheValidityInterval = 60 ftp.FileSystemCacheValidityInterval = 60 ftp.ListDataLoader = New UnixListDataLoader() ftp.FileNameCharset = "sjis" Dim curdir As DirectoryInfo = New DirectoryInfo(ftp, remote_path) For Each file In curdir.GetFiles() file.CopyTo(local_path & file.Name, True) Next End If Catch
End Try
ftp.TimeOutInterval = 1 ftp.Close()
ご教授の程、宜しくお願い致します。
|
|