Problema con ejecución de DTS

[grotero76]

Hola a todos,

estoy intentando ejecutar desde mi aplicación Delphi 7 un paquete DTS de SQL Server 2000. El código que ejecuto es el siguiente:

Código Delphi [-]
try
    // inicializar
    CoInitialize(nil);
    //Crear el objeto
    oPackage:=TPackage.Create(nil);
    // Cargarlo
    oPackage.LoadFromSQLServer(
      servidor, usuario, password,
      256,'', '', '',
      nombredelDTS, vHost);
    // ejecutar
    oPackage.UnInitialize;
    oPackage.Execute;
 except
 on e:exception do
          MessageDlg('Error ejecutando DTS ', mtInformation, [MBOK], 0);        
 end;

El DTS lo que debería hacer es un volcado de datos a una serie de tablas. El problema es que no hace nada, y el código no rompe por ningún sitio. Si ejecuto el DTS manualmente desde SQL Server funciona perfectamente.....

¿Alguna idea de lo que puede estar pasando?

Gracias.