Remember that each transformation has a SourceColumns property so you
may need to iterate over those also.

Here is some code to get you started

Function Main()

dim tformTask, tform,col

set tformTask =
DTSGlobalVariables.Parent.Tasks("DTSTask_DTSDataPu mpTask_1").CustomTask

FOR EACH tform in tformTask.Transformations
FOR EACH col in tform.SourceColumns
MsgBox col.Name
NEXT
NEXT


Main = DTSTaskExecResult_Success
End Function


Allan




"Rafa³ J. Dumañski" <rafal.dumanski (AT) kruk-inkaso (DOT) com.pl> wrote