El paquete en SSIS se ejecuta, pero no cuando lo hago en VB

Hola a todos.

Posteo en los dos grupos por ayuda.
He creado un paquete SSIS, éste se ejecuta bien cuando lo corro sólo, pero
cuando lo quiero ejecutar desde VB (ver el código) éste no da ningún
mensage de error, pero nada pasa en la base de datos, nada se actualiza,
además, cuando lo ejecuto sólo toma unos segundos, desde la función no se
demora nada, como si lo ignorara.
Gracias por sus somentarios.
Dim pkgLocation As String
Dim app As New Application
Dim pkg As Package

pkgLocation = Server.MapPath("SF_Renewal1.dtsx")
pkg = app.LoadPackage(pkgLocation, Nothing)
pkg.Execute()

Me.l_errormessage.Text &= "<br>Execution Result: " &
pkg.ExecutionResult

Hola,

El codigo en VB6 no debería ser así:

Set dtsPackage = New DTS.Package
dtsPackage.LoadFromSQLServer ServerName:="MyServer", _
ServerUserName:="MyUserID", _
ServerPassword:="MyPassword", _
PackageName:="MyPackage"
dtsPackage.Execute


Un Saludo, Víctor Koch



"Don Juan" escribió en el mensaje
news:

Hola a todos.

Posteo en los dos grupos por ayuda.
He creado un paquete SSIS, éste se ejecuta bien cuando lo corro sólo,
pero cuando lo quiero ejecutar desde VB (ver el código) éste no da ningún
mensage de error, pero nada pasa en la base de datos, nada se actualiza,
además, cuando lo ejecuto sólo toma unos segundos, desde la función no se
demora nada, como si lo ignorara.
Gracias por sus somentarios.
Dim pkgLocation As String
Dim app As New Application
Dim pkg As Package

pkgLocation = Server.MapPath("SF_Renewal1.dtsx")
pkg = app.LoadPackage(pkgLocation, Nothing)
pkg.Execute()

Me.l_errormessage.Text &= "<br>Execution Result: " &
pkg.ExecutionResult

2. No es VB6, es VB.NET gracias.

Gracias pero es un archivo .dtsx no está en una base de datos.
1. Cómo puedo añadir mi dtsx a la base de datos???
2. No es VB6, es VB.NET gracias.



"Victor Koch" <v i c t o r
(arroba)correo(punto)waldbott(punto)com(punto)ar> wrote in message
news:%

Hola,

El codigo en VB6 no debería ser así:

Set dtsPackage = New DTS.Package
dtsPackage.LoadFromSQLServer ServerName:="MyServer", _
ServerUserName:="MyUserID", _
ServerPassword:="MyPassword", _
PackageName:="MyPackage"
dtsPackage.Execute


Un Saludo, Víctor Koch



"Don Juan" escribió en el mensaje
news:

Hola a todos.

Posteo en los dos grupos por ayuda.
He creado un paquete SSIS, éste se ejecuta bien cuando lo corro sólo,
pero cuando lo quiero ejecutar desde VB (ver el código) éste no da
ningún mensage de error, pero nada pasa en la base de datos, nada se
actualiza, además, cuando lo ejecuto sólo toma unos segundos, desde la
función no se demora nada, como si lo ignorara.
Gracias por sus somentarios.
Dim pkgLocation As String
Dim app As New Application
Dim pkg As Package

pkgLocation = Server.MapPath("SF_Renewal1.dtsx")
pkg = app.LoadPackage(pkgLocation, Nothing)
pkg.Execute()

Me.l_errormessage.Text &= "<br>Execution Result: " &
pkg.ExecutionResult