Добрый день
SSIS 2008R2

Вывожу в тектс. файл SSIS переменные и коннекшены скриптом (Vb)

хочу вывести конфигурации - и что-то не получается

не понимаю как получить ссылку
код из МСДН
вместо
Dim p1 As Package = app.LoadPackage("c:\pkg.xml",Nothing)
мне надо получить ссылку на текущий пакет - и все должно быть ок

' Save the package and its configuration.
Dim app As Application = New Application()
app.SaveToXml("c:\pkg.xml", pkg, Nothing)

' Reload the package.
Dim p1 As Package = app.LoadPackage("c:\pkg.xml",Nothing)

' Review the configuration information.
Dim configs_After As Configurations = pkg.Configurations
Dim confAfter As Configuration
For Each confAfter In configs_After
Console.WriteLine("ConfigurationString is {0}", confAfter.ConfigurationString)
Console.WriteLine("ConfigurationType is {0}", confAfter.ConfigurationType)
Console.WriteLine("CreationName is {0}", confAfter.CreationName)
Console.WriteLine("Description is {0}", confAfter.Description)
Console.WriteLine("Assigned ID is {0}", confAfter.ID)
Console.WriteLine("Name is {0}", confAfter.Name)
Next