Ver Mensaje Individual
  #1 (permalink)  
Antiguo 26/09/2006, 22:50
Avatar de horizonte
horizonte
 
Fecha de Ingreso: octubre-2005
Ubicación: A 50cm del Monitor(el angulo depende del estado de animo)
Mensajes: 148
Antigüedad: 19 años, 6 meses
Puntos: 1
Pregunta Ejecutar DTS package

Hola:

En los books online del SQL, viene un ejemplo(lo copie abajo), para executar un DTS_package desde una aplic en VBasic.
La pregunta es: alguien sabe si es factible ejecutarlo desde ASP, o VBScript, o JavaScript, ya que lo tengo en una pagina web.
Tambien probe desde el DTS, "guardar como Visual Basic File", y ahi tambien obtengo la rutina, en un archivo.bas ,lo quise "embeber" con ASP, pero no funciona.

Código:
Public Sub Main()
'Run package stored in file C:\DTS_UE\TestPkg\VarPubsFields.dts.
    Dim oPackage    As DTS.Package
    Dim oStep       As DTS.Step
    Dim oTask       As DTS.Task
    Dim oCustTask   As DTS.ExecutePackageTask

    Set oPackage = New DTS.Package

    'Create step and task, link step to task.
    Set oStep = oPackage.Steps.New
    oStep.Name = "ExecPkgStep"
    Set oTask = oPackage.Tasks.New("DTSExecutePackageTask")
    Set oCustTask = oTask.CustomTask
    oCustTask.Name = "ExecPkgTask"
    oStep.TaskName = oCustTask.Name
    oPackage.Steps.Add oStep
    Set oStep = Nothing

    'Specify package to be run.
    oCustTask.PackagePassword = "user"
    oCustTask.FileName = "C:\DTS_UE\TestPkg\VarPubsFields.dts"

    'Link task to package, run package.
    oPackage.Tasks.Add oTask
    Set oCustTask = Nothing
    Set oTask = Nothing
    oPackage.Execute
    Set oPackage = Nothing
End Sub
Desde ya muchas gracias a quien pueda aportar algo,
Saludos.
__________________
Mientras tanto aqui, en la Gran Ciudad...
Una nueva hora,...Comienza
:Zzz: