Garg) wrote:

>I am trying to load a Package from a repository, my server name has a
>funny name but i get this mssage....could someone give a hint where I
>am going wrong?
>
>
> Private Sub Form_Load()
> Dim pkg As DTS.Package
> pkg.LoadFromRepository "17433136281", "msdb", "sa", "",
>"{B3E46B63-FEE6-43CB-849B-8C87510FE4CA}", , "test",
>DTSReposFlag_Default
> pkg.WriteCompletionStatusToNTEventLog = False
> pkg.LogFileName = "c:\dts\error\northwindolapunleashed.txt"
> pkg.FailOnError = False
> pkg.PackagePriorityClass = DTSPriorityClass_Normal
> pkg.MaxConcurrentSteps = 8
> pkg.LineageOptions = DTSLineage_AddLineageVariables +
>DTSLineage_WriteToReposIfAvailable
> pkg.UseTransaction = True
> pkg.TransactionIsolationLevel = DTSIsoLevel_ReadCommitted
>
> End Sub
>
>I get the message Object variable with block variable not set.....The
>QL server has been checked out by me and I have alsoput the correct Id
>fro the package...
>
>
>
>Thnaks in anticipation
>
>
>
>Ajay