Como rodar um Package do SQL Server via Programação
Bom dia, como faço para rodar um arquivo DTS do SQL SERVER via programação?? li uma dica no ramos da informatica mais não consegui, segue a dica abaixo: (Quando tento importar o arquivo dtspkg.dll da erro, ´estou usando delphi6 com SQL SERVER 7.0)
1º - Importe as classes do arquivo dtspkg.dll
CODIGO:
procedure TForm1.Button1Click(Sender: TObject);
var Pakage: _package;
begin
Pakage:= CreateComObject(Class_package) as _package;
Pakage.LoadFromStorageFile( ´Arquivo.dts´ , ´´ , Package_GUID , Version_GUID , Name_Package ,emptyparam);
Pakage.Execute;
Pakage.UnInitialize;
end;
// onde: Arquivo.dts é o caminho completo + o nome do package.
// Package_GUID identificação do package (pode ser obtida em: Package | Properties no editor de packages)
// Version_GUID versão do package (pode ser obtida em: Package | Properties no editor de packages)
// Name_Package nome do package (pode ser obtida em: Package | Properties no editor de packages)
1º - Importe as classes do arquivo dtspkg.dll
CODIGO:
procedure TForm1.Button1Click(Sender: TObject);
var Pakage: _package;
begin
Pakage:= CreateComObject(Class_package) as _package;
Pakage.LoadFromStorageFile( ´Arquivo.dts´ , ´´ , Package_GUID , Version_GUID , Name_Package ,emptyparam);
Pakage.Execute;
Pakage.UnInitialize;
end;
// onde: Arquivo.dts é o caminho completo + o nome do package.
// Package_GUID identificação do package (pode ser obtida em: Package | Properties no editor de packages)
// Version_GUID versão do package (pode ser obtida em: Package | Properties no editor de packages)
// Name_Package nome do package (pode ser obtida em: Package | Properties no editor de packages)
Lincoln
Curtidas 0