Люди добрі, поможите, як запустити DTS пакет
1. є ім'я сервера, ім'я DTS пакету, логін-пароль природно Дельфах, мої криві руки і дірява голова
потрібно - запустити DTS пакет.
2. Є готовий пакет на сервері. Як можна перед виконанням пункту 1 вказати який файл йому чіпляти? Або для цього треба пересоздавать пакет?
uses
# XA0; Forms,
# XA0; fMain in "fMain.pas",
# XA0; DTS_TLB in "c: \ program files \ borland \ bds \ 4.0 \ Imports \ DTS_TLB.pas";
begin
# XA0; Application.Initialize;
# XA0; Application.CreateForm (TForm1, Form1);
# XA0; Application.Run;
end.
відключаю # XA0; DTS_TLB і все в порядку. Що я міг зробити не так?
пеши исчо, цікавий блог вийшов
:)
begin
# XA0; Forms.Application.Initialize;
# XA0; Forms.Application.CreateForm (TForm1, Form1);
# XA0; Forms.Application.Run;
end.
так що питання управління пакетом поки розколупувати методом антинаукового тику :(
дійшов до наступного
пакет повинен отримати дані з ДБФ
# XA0; pack.LoadFromSQLServer ( "SERVER", "sa", "PASSW", 0, "", "", "", "ІМ'Я ПАКЕТУ", EmptyParam);
# XA0; pack.Tasks.Item (1) .Properties.Item (4) .Value: = "TEST"; # XA0; // SourceObjectName по ідеї назву таблиці ДБФ
# XA0; pack.Connections.Item (1) .DataSource: = "\\ ukc \ D $ \ micex_quotes \ cur"; # XA0; # XA0; // шлях до файлів
# XA0; Pack.Set_LogFileName ( "d: \ ErrorFile.txt"); // куди писати лог помилок
# XA0; pack.Execute; // власне запуск
отримую помилку
Step Error Source: Microsoft OLE DB Provider for SQL Server
Step Error Description: [DBNETLIB] [ConnectionOpen (Connect ()).] SQL-сервер не існує, або не маєте доступу.
залишається зрозуміти що, не знайдено файл або сервер
чого тут розуміти то? помилка хіба не очевидно прямим текстом написана.
> SQL-сервер не існує, або не маєте доступу.
причому тут файл? залогінитися ти своїми параметрами не можеш.
звідси питання: запускати подібне неподобство треба на машині сервері або на клієнті?
і ніби як воно запрацювало