当没有文件可供下载时，如何避免 SSIS FTP 任务失败？

我正在使用 SQL Server 2005，并在 SSIS 中创建 ftp 任务。

有时会有文件需要通过 ftp 传输，有时则不会。如果没有文件，我不希望任务或包失败。我已将从 ftp 任务到下一个任务的箭头更改为“完成”，以便包运行。我已将允许的错误数更改为 4（因为有 4 个 ftp 任务，并且 4 个目录中的任何一个都可能有文件，也可能没有文件）。

但是，当我从代理中的作业运行该包时，它将该作业标记为失败。由于这将每 15 分钟运行一次，因此我不希望我的工作历史记录中有一堆红色 x，这将导致我们在问题真正发生时看不到问题。

如何设置 ftp 任务中的属性，以便未找到要 ftp 的文件不会失败？我正在使用的操作是“发送文件”。

以下是更多信息：这些文件位于服务器上，除了 ftp 之外，我无法通过该服务器进行任何访问。而且，我事先不知道文件名。用户可以随意称呼它们。所以我无法检查特定文件，我认为我根本无法检查。除非使用 ftp 连接和基于该连接的任务。这些文件位于远程服务器上，我想将它们复制到我的服务器，以从该远程服务器获取它们。

我可以在脚本任务中对命令级 ftp 进行 shell 处理。也许这就是我需要使用的而不是 ftp 任务。 （我已更改为使用 ftp 命令行，并带有从脚本任务调用的参数文件。当没有要获取的文件时，它不会给出错误。我认为这个解决方案对我有用。我正在创建动态参数文件，这意味着我不需要在纯文本文件中包含连接信息，而是可以存储在我的配置文件中，该文件位于更安全的位置。）

我知道您已经找到了问题的答案。这是针对可能偶然发现此问题的其他用户的。这是实现这一目标的一种可能方法。Script Task可用于查找给定模式的 FTP 文件夹路径中存在的文件列表（例如*.txt）。下面的示例展示了如何做到这一点。

分步过程：

1. 在 SSIS 包上创建一个FTP Connection named FTP并还创建5变量如屏幕截图所示#1。多变的RemotePath包含 FTP 文件夹路径；LocalPath包含文件将下载到的文件夹；FilePattern包含文件模式以查找要从 FTP 服务器下载的文件列表；FileName将由以下人员填充Foreach loop container但为了避免 FTP 任务设计时错误，可以将其填充为/ or the DelayValidationFTP 任务上的属性可以设置为True.

2. 在 SSIS 包上，放置一个Script Task, Foreach Loop container and FTP Task内Foreach Loop container如截图所示#2.

3. 更换Main()内的方法Script Task与下面的代码脚本任务代码部分。脚本任务将填充变量文件列表与匹配给定模式的文件集合。此示例将首先使用模式 *.txt，该模式不会产生任何结果，然后使用模式 *.xls，该模式将匹配 FTP 服务器上的几个文件。

4. 配置Foreach Loop container如截图所示#3 and #4。此任务将循环访问变量 **ListOfFiles*。如果没有文件，循环容器内的FTP任务将不会执行。如果有文件，则循环容器内的 FTP 任务将执行在 FTP 服务器上找到的文件数量的任务。

5. 配置FTP Task如截图所示#5 and #6.

6. 截屏 ＃7显示示例包执行情况no找到该模式的匹配文件*.txt.

7. 截屏 ＃8显示文件夹的内容C:\temp\ before包的执行。

8. 截屏 ＃9显示找到该模式的匹配文件时的示例包执行情况*.xls.

9. 截屏 ＃10显示 FTP 远程路径的内容/Practice/Directory_New.

10. 截屏 ＃11显示文件夹的内容C:\temp\ after包的执行。

11. 截屏 ＃12当提供不正确的信息时显示包失败远程路径.

12. 截屏 ＃13显示与包失败相关的错误消息。

希望有帮助。

脚本任务代码：

C#可以使用的代码SSIS 2008 and above.

包括using陈述使用 System.Text.RegularExpressions；

public void Main()
{
    Variables varCollection = null;
    ConnectionManager ftpManager = null;
    FtpClientConnection ftpConnection = null;
    string[] fileNames = null;
    string[] folderNames = null;
    System.Collections.ArrayList listOfFiles = null;
    string remotePath = string.Empty;
    string filePattern = string.Empty;
    Regex regexp;
    int counter;

    Dts.VariableDispenser.LockForWrite("User::RemotePath");
    Dts.VariableDispenser.LockForWrite("User::FilePattern");
    Dts.VariableDispenser.LockForWrite("User::ListOfFiles");
    Dts.VariableDispenser.GetVariables(ref varCollection);

    try
    {
        remotePath = varCollection["User::RemotePath"].Value.ToString();
        filePattern = varCollection["User::FilePattern"].Value.ToString();

        ftpManager = Dts.Connections["FTP"];
        ftpConnection = new FtpClientConnection(ftpManager.AcquireConnection(null));
        ftpConnection.Connect();
        ftpConnection.SetWorkingDirectory(remotePath);
        ftpConnection.GetListing(out folderNames, out fileNames);
        ftpConnection.Close();

        listOfFiles = new System.Collections.ArrayList();
        if (fileNames != null)
        {
            regexp = new Regex("^" + filePattern + "$");
            for (counter = 0; counter <= fileNames.GetUpperBound(0); counter++)
            {
                if (regexp.IsMatch(fileNames[counter]))
                {
                    listOfFiles.Add(remotePath + fileNames[counter]);
                }
            }
        }

        varCollection["User::ListOfFiles"].Value = listOfFiles;
    }
    catch (Exception ex)
    {
        Dts.Events.FireError(-1, string.Empty, ex.ToString(), string.Empty, 0);
        Dts.TaskResult = (int) ScriptResults.Failure;
    }
    finally
    {
        varCollection.Unlock();
        ftpConnection = null;
        ftpManager = null;
    }

    Dts.TaskResult = (int)ScriptResults.Success;
}

VB可以使用的代码SSIS 2005 and above.

包括Imports陈述导入 System.Text.RegularExpressions

Public Sub Main()
    Dim varCollection As Variables = Nothing
    Dim ftpManager As ConnectionManager = Nothing
    Dim ftpConnection As FtpClientConnection = Nothing
    Dim fileNames() As String = Nothing
    Dim folderNames() As String = Nothing
    Dim listOfFiles As Collections.ArrayList
    Dim remotePath As String = String.Empty
    Dim filePattern As String = String.Empty
    Dim regexp As Regex
    Dim counter As Integer

    Dts.VariableDispenser.LockForRead("User::RemotePath")
    Dts.VariableDispenser.LockForRead("User::FilePattern")
    Dts.VariableDispenser.LockForWrite("User::ListOfFiles")
    Dts.VariableDispenser.GetVariables(varCollection)

    Try

        remotePath = varCollection("User::RemotePath").Value.ToString()
        filePattern = varCollection("User::FilePattern").Value.ToString()

        ftpManager = Dts.Connections("FTP")
        ftpConnection = New FtpClientConnection(ftpManager.AcquireConnection(Nothing))

        ftpConnection.Connect()
        ftpConnection.SetWorkingDirectory(remotePath)
        ftpConnection.GetListing(folderNames, fileNames)
        ftpConnection.Close()

        listOfFiles = New Collections.ArrayList()
        If fileNames IsNot Nothing Then
            regexp = New Regex("^" & filePattern & "$")
            For counter = 0 To fileNames.GetUpperBound(0)
                If regexp.IsMatch(fileNames(counter)) Then
                    listOfFiles.Add(remotePath & fileNames(counter))
                End If
            Next counter
        End If

        varCollection("User::ListOfFiles").Value = listOfFiles

        Dts.TaskResult = ScriptResults.Success

    Catch ex As Exception
        Dts.Events.FireError(-1, String.Empty, ex.ToString(), String.Empty, 0)
        Dts.TaskResult = ScriptResults.Failure
    Finally
        varCollection.Unlock()
        ftpConnection = Nothing
        ftpManager = Nothing
    End Try

    Dts.TaskResult = ScriptResults.Success
End Sub

屏幕截图#1：

屏幕截图#2：

屏幕截图#3：

屏幕截图#4：

屏幕截图#5：

屏幕截图#6：

屏幕截图#7：

屏幕截图#8：

屏幕截图#9：

屏幕截图#10：

屏幕截图#11：

屏幕截图#12：

屏幕截图#13：