DTS PAckage

[jockey]

HOw can I execute a DTS package from within A vb application

 

[tb]

This has been covered many times . . .
but here goes:
Reference: dtspkg.dll

Dim objPackage As DTS.Package2

'Instanciate the DTS package object
Set objPackage = New DTS.Package2

'Set the server/username/password and the DTS package to be run
objPackage.LoadFromSQLServer ServerName, UserName, Password, DTSSQLStgFlag_Default, "", "", "", "DTS_Name"

'Pass the Global variables - date values to the DTS Package
objPackage.GlobalVariables("FromDate&quot.Value = dtpFrom.Value
objPackage.GlobalVariables("ToDate&quot.Value = dtpTo.Value

'Set object to raise an error on failure and to do eventlogs
objPackage.FailOnError = True
objPackage.WriteCompletionStatusToNTEventLog = True

'Run DTS Package
objPackage.Execute

objPackage.UnInitialize

'Mark objects for garbage collection
Set objPackage = Nothing

Hope you find this useful.


I was standing in the park, wondering why frisbees got bigger as they came closer... then it hit me!

 

[jockey]

Cheers mate most helpfull

Dont suppose u know anything about stored procedures do u??

 

[tb]

What about them?
>Dont suppose u know anything about stored procedures do u??

I was standing in the park, wondering why frisbees got bigger as they came closer... then it hit me!