Re: parameter driven DTS

the actual code is given below from my form: the string "newSUID" is set as
the globalvariables in the DTS package

Dim package As DTS.Package2Class
package = New DTS.Package2Class
Dim filename As String
Dim password As String
Dim packageID As String
Dim versionID As String
Dim name As String
Dim pVarPersustStgOfHost As Object
filename = "c:\New.dts"
password = ""
packageID = ""
versionID = ""
name = "New"
' assign the global variable a value here
package.GlobalVariables.Item("newSUID").Value =
"1.3.6.1.4.1.2452.6.120050221.20844.304.1416026628"
pVarPersustStgOfHost = Nothing
package.LoadFromStorageFile(filename, _
password, packageID, versionID, _
name, pVarPersustStgOfHost)
Try
package.Execute()
Catch ex As Exception
MsgBox(ex.ToString)
Finally
package.UnInitialize()
package = Nothing
End Try


Any ideas and help pls

kesk


.

Relevant Pages

  • Multiple Log Providers
    ... Logs the output from the package to custom tables. ... Dim strPathPkg As String ... Dim pkgChild As New Package ... ByVal sourceName As String, ByVal sourceID As String, ByVal ...
    (microsoft.public.sqlserver.dts)
  • Re: SQL Server Agent Job vs Stored Packages
    ... The script starts another scriptwith Plink on the ... Dim RC As Boolean = start_dialogue_pl ... Dim myResponse As String = "" ... When you execute a package as a job, how do you see the tasks turn ...
    (microsoft.public.sqlserver.dts)
  • Re: SQL Server Agent Job vs Stored Packages
    ... The script starts another scriptwith Plink on the ... Dim RC As Boolean = start_dialogue_pl ... Dim myResponse As String = "" ... When you execute a package as a job, how do you see the tasks turn ...
    (microsoft.public.sqlserver.dts)
  • DTS pkg VB6 to VB.Net problems - Sql Srv2000
    ... I created a DTS package VB6 script with DTS from Sql ... Dim ErrorSource As String ... Dim ErrorDescription As String ...
    (microsoft.public.dotnet.languages.vb)
  • Search pattern
    ... Dim strfile As String ... Dim bAddressFound As Boolean ... Dim strCurrentChar As String ...
    (comp.databases.ms-access)