Question

以下是我在脚本任务中编写的代码，但是我收到了错误，未声明名称'DTS'

1）任何想法，如何解决？

2）另一个问题是，而不是 “MsgBox（”找到的文件“）”“，我想发一封电子邮件作为错误，我该怎么写？

非常感谢

Imports System
Imports System.Data
Imports System.Math
Imports Microsoft.SqlServer.Dts.Runtime

Imports System.IO

Public Class ScriptMain

    Public Sub Main()

        If Directory.GetFiles("C:\456").Length = 0 Then
            MsgBox(" files found)")
        Else
            MsgBox("not found)")
        End If
        Dts.TaskResult = Dts.Results.Success
    End Sub
End Class

Answer 1

1）尝试简单地返回0（代表成功）

Dts.TaskResult = 0

2）将MsgBox（“找到的文件”）更改为类似的内容

Dim client As SmtpClient = new SmtpClient("hostname", 25)
client.Send("from@address.com", "to@address.com", "subject", "body")

在这种情况下，请不要忘记导入命名空间

Imports System.Net.Mail

我不确定发送是否有效，但你可以试试

脚本任务的SSIS 2008错误

1 个答案: