如何在Delphi中使用DTS包？

Question

如何在Delphi中使用DTS包？
如果有好的电子书，请给个链接
如果有好的文章，请转帖。
谢谢。
如果有实际的代码例子，就更好了。

Answer 1

生成一个批处理文件，让他完成
var f:textfile; 
begin 
assignfile(f,'.\delme.bat'); 
rewrite(f); 
writeln(f,'rundts a.dts'); 
closefile(f); 
winexec('.\delme.bat', SW_HIDE); 
close; 
end; 

Answer 2

多了一个CLOSE；去掉。
var f:textfile; 
begin 
assignfile(f,'.\delme.bat'); 
rewrite(f); 
writeln(f,'rundts a.dts'); 
closefile(f); 
winexec('.\delme.bat', SW_HIDE); 
end;

Answer 3

没问题的，
首先dts包和你生成的*.bat文件要在同一个路径下。
那个运行DTS包的命令是 "dtsrun /f a.dts"我记错了，不好意思。

Answer 4

要不直接写个*.bat文件，里面命令是“dtsrun /f a.dts”，然后在delphi程序中调用他也行。