Ответ 1
На вкладке script убедитесь, что вы поместили эту переменную в текстовые поля readonlyvariables или readwritevariables.
Вот простой script, который я использую для форматирования ошибок в потоке данных (сохраненных в переменной RecordSet) в теле письма. В основном я читаю varialbe набора записей в datatable и обрабатываю его по строкам с помощью циклов for. По завершении этой задачи я проверю значение uvErrorEmailNeeded, чтобы определить, есть ли что-нибудь по электронной почте, используя условный соединитель потока процесса. Вам также нужно добавить ссылку на system.xml в свой vb script. Это в SQL 2005.
Imports System
Imports System.Data
Imports System.Math
Imports Microsoft.SqlServer.Dts.Runtime
Imports System.Xml
Imports System.Data.OleDb
Public Class ScriptMain
Public Sub Main()
Dim oleDA As New OleDbDataAdapter
Dim dt As New DataTable
Dim col As DataColumn
Dim row As DataRow
Dim sMsg As String
Dim sHeader As String
oleDA.Fill(dt, Dts.Variables("uvErrorTable").Value)
If dt.Rows.Count > 0 Then
Dts.Variables("uvErrorEmailNeeded").Value = True
For Each col In dt.Columns
sHeader = sHeader & col.ColumnName & vbTab
Next
sHeader = sHeader & vbCrLf
For Each row In dt.Rows
For Each col In dt.Columns
sMsg = sMsg & row(col.Ordinal).ToString & vbTab
Next
sMsg = sMsg & vbCrLf
Next
Dts.Variables("uvMessageBody").Value = "Error task. Error list follows:" & vbCrLf & sHeader & sMsg & vbCrLf & vbCrLf
End If
Dts.TaskResult = Dts.Results.Success
End Sub
End Class