Please start any new threads on our new site at https://forums.sqlteam.com. We've got lots of great SQL Server experts to answer whatever question you can come up with.

 All Forums
 SQL Server 2000 Forums
 Import/Export (DTS) and Replication (2000)
 Skip task

Author  Topic 

AskSQLTeam
Ask SQLTeam Question

0 Posts

Posted - 2007-01-08 : 08:00:54
sridhar writes "Problem : I had two conditions in active x script task

If file exist i have to execute step-1

if file does not exist i have to execute step-2

I have done following code but I could not reach my destination.

********************
Dim pkg
Dim stp4Ext1
Dim stp4Ext2
Dim stp4Ext3
Dim stp4Ext4
Dim stp5
Dim stp6

set pkg = DTSGlobalVariables.Parent

set stp4Ext1 = pkg.Steps("DTSStep_DTSDataPumpTask_15")
set stp4Ext2 = pkg.Steps("DTSStep_DTSActiveScriptTask_21")
set stp4Ext3 = pkg.Steps("DTSStep_DTSActiveScriptTask_17")
set stp4Ext4 = pkg.Steps("DTSStep_DTSActiveScriptTask_25")
set stp5= pkg.Steps("DTSStep_DTSDataPumpTask_13")
Set stp6=pkg.Steps("DTSStep_DTSActiveScriptTask_20")

IF Fso.FileExists(FileName) THEN

stp4Ext1.DisableStep = False
stp4Ext2.DisableStep = False
stp4Ext3.DisableStep = False
stp4Ext4.DisableStep = True


ELSE
stp4Ext1.DisableStep = True
stp4Ext2.DisableStep = True
stp4Ext3.DisableStep = True
'stp4Ext4.DisableStep = True

Msgbox "File Does Not Exist 1"
Msgbox stp5.ExecutionStatus

stp4Ext1.ExecutionStatus=DTSStepExecStat_Inactive
stp4Ext2.ExecutionStatus=DTSStepExecStat_Inactive
stp4Ext3.ExecutionStatus=DTSStepExecStat_Inactive
stp4Ext4.ExecutionStatus=DTSStepExecStat_Inactive

stp5.ExecutionStatus = DTSStepExecStat_Waiting


End IF
******************************"
   

- Advertisement -