[DTS]Vanuit een ActiveX script een ander package aanschoppen

Pagina: 1
Acties:

  • baskabas
  • Registratie: December 2000
  • Laatst online: 05-04 12:26
Weet iemand hoe ik op eenvoudige wijze vanuit een ActiveX script binnen een DTS Package een ander DTS Package aan kan schoppen...

Ik heb al een manier gevonden... maar dan moet je een heel package object aan gaan maken enzo... dat is meer voor een aanroep vanuit een externe applicatie...
Visual Basic:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
Private Sub RunPackage()
'Run the package stored in file C:\DTS_UE\TestPkg\VarPubsFields.dts.
Dim objPackage      As DTS.Package2
Dim objStep         As DTS.Step
Dim objTask         As DTS.Task
Dim objExecPkg      As DTS.ExecutePackageTask

On Error GoTo PackageError
Set objPackage = New DTS.Package
Set mobjPkgEvents = objPackage
objPackage.FailOnError = True

'Create the step and task. Specify the package to be run, and link the step to the task.
Set objStep = objPackage.Steps.New
Set objTask = objPackage.Tasks.New("DTSExecutePackageTask")
Set objExecPkg = objTask.CustomTask
With objExecPkg
    .PackagePassword = "user"
    .FileName = "C:\DTS_UE\TestPkg\VarPubsFields.dts"
    .Name = "ExecPkgTask"
End With
With objStep
    .TaskName = objExecPkg.Name
    .Name = "ExecPkgStep"
    .ExecuteInMainThread = True
End With
objPackage.Steps.Add objStep
objPackage.Tasks.Add objTask

'Run the package and release references.
objPackage.Execute

Set objExecPkg = Nothing
Set objTask = Nothing
Set objStep = Nothing
Set mobjPkgEvents = Nothing

objPackage.UnInitialize
End Sub

Vind ik een beetje omslachtig... ik zoek eerder zoiets:
code:
1
DTSRun "ANDER DTS PAKKETJE", Server.Name
:*)

  • baskabas
  • Registratie: December 2000
  • Laatst online: 05-04 12:26
Ok, ik heb het nu zo opgelost...
Visual Basic:
1
2
3
4
5
6
set pkgRapport = New DTS.Package

pkgRapport.LoadFromSQLServer Server.Name, , , DTSSQLStgFlag_UseTrustedConnection, , , , "PACKAGE"
pkgRapport.Execute

set  pkgRapport = Nothing

Works for me! :D

  • zneek
  • Registratie: Augustus 2001
  • Laatst online: 08-02-2025
Dit had je ook anders op kunnen lossen. In de package designer kun je naast script acties en datacopy acties ook packages aanroepen. Gewoon "sleur-en-pleur" :) Als je je ActiveX skrippie succes of failure laat terug geven kun je op basis daarvan een ander package aanroepen.