0

SSIS スクリプト タスクを使用して FTP サーバーからファイルをダウンロードしようとしています。クラス 'ftpClientConnection' クラスを使用しており、その中で 'ReceiveFiles' メソッドを使用して FTP の場所からローカル フォルダーにファイルをダウンロードしようとしました。しかし、例外エラーが発生しています。スクリプト タスクをデバッグすると、「ftp.connect()」行で例外が発生することがわかりました。「ftpClientConnection」のオブジェクトを作成する際に、必要な引数をすべて渡しました。別の方法でデバッグするには、単純に FTP タスクを使用してみましたが、ここでも「接続を確立できません」というエラーが発生します。参考までに、スクリプト タスクと FTP タスクの両方で提供されたサービス資格情報を使用して、FTP の場所にログインできます。

PS: VB.net は初めてです

コードはこちら

    Dim cm As ConnectionManager = Dts.Connections.Add("FTP")

    'Set the properties like username & password

    cm.Properties("ServerName").SetValue(cm, "ftp://<ftpname>/")

    cm.Properties("ServerUserName").SetValue(cm, "<username>")

    cm.Properties("ServerPassword").SetValue(cm, "<password>")

    cm.Properties("ServerPort").SetValue(cm, "21")

    cm.Properties("Timeout").SetValue(cm, "0") 

    cm.Properties("ChunkSize").SetValue(cm, "1000")

    cm.Properties("Retries").SetValue(cm, "1")


    Dim ftp As FtpClientConnection = New FtpClientConnection(cm.AcquireConnection(Nothing))


    ftp.Connect()

    Dim remotefilenames() As String = {"<ftpfolder/filename.txt>"}

    Dim localpath As String = "<C:\localfolder\FTPDestination\>"

    'Build a array of all the file names that is going to be downloaded (in this case only one file)

    ftp.ReceiveFiles(remotefilenames, localpath, True, True)

    ftp.Close()

「ftp.connect()」行で例外が発生しています

4

0 に答える 0