DTS workflow problem when encountering On Failure

[shinobi332]

I am creating a DTS package in SQL Server 2000.
I am importing a text file : on success the workflow will continue and
run SQLTask A and then SQLTask B
On Failure I am executing an activeX script to try and exec only
SQLTask B.

When the import fails it simply stops on the activeX task and does not
continue...

Here is the script:

'************** *************** *************** *************** ***********
' Visual Basic ActiveX Script
'************** *************** *************** *************** *************
Option Explicit

Function Main()

'** Do Not Run this step
dim oStep
Set oStep = oPkg.Steps("DTS Step_DTSExecute SQLTask_1")
oStep.Execution Status = DTSStepExecStat _Inactive

'** Run the following step
dim stpGo
Set oPKG = DTSGlobalVariab les.Parent
set stpGo = oPkg.Steps("DTS Step_DTSExecute SQLTask_2")
stpGo.Execution Status = DTSStepExecStat _Waiting

Main = DTSTaskExecResu lt_Success
End Function

I've used this logic before but never after a failure.
Any help would be appreciated.