On 04th Jan, 10 | Tags:
dts Dim fso, file1
Dim pkg
SET pkg = DTSGlobalVariables.Parent
Set fso = CreateObject("Scripting.FileSystemObject")
IF (fso.FileExists("c:\abc.txt")) THEN
Msgbox "File exist. Continue"
pkg.Steps("DTSStep_DTSActiveScriptTask_2").DisableStep=False
Set fso= Nothing
ELSE
Msgbox "Stop"
pkg.Steps("DTSStep_DTSActiveScriptTask_2").DisableStep=True
END IF
set pkg=nothing
Main = DTSTaskExecResult_Success