![]() |
Como puedo cargar un SQL DTS desde Delphi?
Tengo un DTS File creado en SQL Server como puedo cargar ese DTS en otro SQL server por medio de Delphi, me gustaria que me mandaran algun codigo de como hacerlo muchas gracias
|
Me llamó la atención tu pregunta y le dí un googlaso:
************************************************** var TheDTS,objConnect: Variant; i:integer; Begin TheDTS:= CreateOleObject('DTS.Package'); try TheDTS.LoadFromStorageFile(ExtractFilePath(ParamStr(0)) + '\UpdateAM5.dts',''); //TheDTS.GlobalVariables.Item('TheMDB').value:='C:\Program Files\Agency Manager\Data\amdata.mdb'; for i := 1 to TheDTS.Steps.count do TheDTS.Steps.Item(i).ExecuteinMainThread := True; TheDTS.FailOnError := true; TheDTS.Execute; except on E: Exception do begin //Display the error message.// ShowMessage('Bugger something went wrong = ' + E.Message); end; end; TheDTS.UnInitialize; TheDTS:= Unassigned; ShowMessage('Done'); ************************************************* Comentanos si jala. SAludos |
Hola.
No escribas el mismo mensaje en varios foros http://www.clubdelphi.com/foros/guiaestilo.php (he eliminado los otros mensajes). Otra opción que tienes es ejecutar el comando dtsrun mediante la función ShellExecute, pasándole por parámetro el dts a ejecutar. Saludos. Editado para corregir el link a la Guía de Estilo |
La franja horaria es GMT +2. Ahora son las 20:43:40. |
Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi