I create DTS Package with simple transformation task by VB6 code. Then, using SQL DMO I want to create many jobs to run this package, but with parameter, wich customize source sql query.
For example:

ActiveX Script Step of Job1:
Dim o
Set o = CreateObject("DTS.Package&#34
o.LoadFromServerLoadFromSQLServer "(local)", "sa","",,,,,"My Package"
o.GlobalVariables("Param&#34.Value = 'Value1'
o.Execute
Set o = Nothing

ActiveX Script Step of Job1:
Dim o
Set o = CreateObject("DTS.Package&#34
o.LoadFromServerLoadFromSQLServer "(local)", "sa","",,,,,"My Package"
o.GlobalVariables("Param&#34.Value = 'Value 2'
o.Execute
Set o = Nothing

Is it correct. And if exists(select best_solution from solutions) help_me

Thank you