When I packaged SP4, code below will occure an error, however, before SP4, it
works well. I assume there is any change for Object Modal in SP4.

Dim oPackageOld As New DTS.Package
Dim oPackage As DTS.Package2
Set oPackage = oPackageOld
............
Dim oTask As DTS.Task
Dim oCustomTask1 As DTSOlapProcess.Task
Set oTask = DTSPackage.Tasks.New("DTSOlapProcess.Task")
oTask.Name = "DTSTask_DTSOlapProcess.Task_1"
Set oCustomTask1 = oTask.CustomTask
oCustomTask1.Name = "DTSTask_DTSOlapProcess.Task_1"

When run over "Set oCustomTask1 = oTask.CustomTask", an error ‘Type
mismatch’ will popup. Anyone can help me?