Correr un DTS de sql server desde delphi

[JuanchoArg]

HOla amigos de nuevo, ahora tengo otro problemita, , como hago para correr un DTS desde delphi. Si alguien lo sabe y me lo puede explicar se lo agradeceria.

Saludos

Juan

[Neftali [Germán.Estévez]]

Marchando... directamente desde CodeCentral:

DTS in Delphi
This source code demonstrates controlling DTS of MS SQL 2000 in Delphi. Source is from MS SQL database to MS Excel.

link

[JuanchoArg]

Te agradezco la ayuda, pero realmente el codigo disponible es poco entendible, al menos para mi, asi que no me queda otra que hacer un modulo en visual basic y llamarlo desde delphi. Necesito una solucion urgente y ya estoy perdiendo mucho tiempo con Delphi para hacer esto. Gracias por todo.

Saludos

[Neftali [Germán.Estévez]]

No es muy complejo, en realidad es bantante sencillo (sobre todo si ya tienes el DTS creado); Aquí tienes el ejemplo completo -compilado-(Delphi 6):

Código Delphi [-]
  var
     oPackage:TPackage;
     vHost: OleVariant;
   begin
     try
       // inicializar
       CoInitialize(nil);
       //Crear el objeto
       oPackage:=TPackage.Create(nil);
       // Cagarlo
       oPackage.LoadFromSQLServer(
         Edit1.Text,     // Servidor
         Edit2.Text,     // Usuario
         Edit3.Text,     // Contraseña
         256,'', '', '',
         Edit4.Text,     // Nombre del DTS
         vHost);
       // ejecutar
       oPackage.UnInitialize;
       oPackage.Execute;
       MessageDlg('Ejecución correcta.', mtInformation, [mbOK], 0);
     except
       raise;
     end;

[JuanPa1]

Con este programa es posible ejecutar un archivo que no se encuentre necesariamente en el servidor de base de datos??; es decir, puedo ejecutar un archivo que se encuentre por ejemplo en esta ubicación:
C:\Temp\archivo.test

Gracias por su pronta respuesta..

Saludos.

[Neftali [Germán.Estévez]]

Empezado por JuanPa1

Con este programa es posible ejecutar un archivo que no se encuentre necesariamente en el servidor de base de datos??

Esto ejecuta DTS's programados en el Servidor.
¿Qué contiene ese fichero que quieres ejecutar?

[JuanPa1]

Tengo un archivo de texto(.txt) en el cual guardo información generada en una consulta a una base de datos. Este archivo de texto si lo he podido ejecutar desde SQL Server y no me ha dado problema, pero lo que quiero saber es si es posible ejecutarlo con la aplicación de Delphi.

Saludos.

[Neftali [Germán.Estévez]]

No entiendo que quieres decir con ejecutar ese fichero.
¿Qué datos tiene? ¿Qué quiere decir que lo ejecutas desde SQL Server?

[JuanPa1]

Talvez la palabra correcta no sea ejecutar sino cargar la información que tiene ese archivo de texto a una Base de Datos de SQL Server.
El archivo de texto tiene información de una tabla de access al cual lo he cargado mediante una consulta sql y he guardado en el archivo el conjunto de resultados que me ha retornado dicha consulta.
Desde SQL Server si puedo importar este archivo de texto, pero como te comento lo que deseo saber es si la aplicación de delphi me permite cargar el archivo en una tabla de SQL Server.

[Neftali [Germán.Estévez]]

Si haces un DTS que carge ese archivo de texto y lanzas el DTS desde el programa Delphi, no deberías tener problemas.