SQL Server DTS自定义任务。(300分)

  • 主题发起人 主题发起人 SexyDarkKnight
  • 开始时间 开始时间
S

SexyDarkKnight

Unregistered / Unconfirmed
GUEST, unregistred user!
在Delphi 7中写了一个最简单的DTS自定义任务。
TTest = class(TAutoObject, CustomTask)
仅仅是实现了CustomTask的方法(代码就不贴了)。
问题是:
在DTS包中(SQL SERVER的DTS设计器),放一个TTest的任务,然后复制它,这个时候就出错了(或者在“脱接编辑”中,编辑任务,选中这个TTest时,同样错误)。EXCEPTION_ACCESS_VIOLATION。
但是我看了用VB,C#写的自定义任务,就不会出这个问题。
如果不能重现这个问题,那能写一个不出错的DELPHI 7例子,也算。
 
求解啊。
达人解答。
自己顶上去。
 
[:(]没人解答吗?
 
我在老外的网站上找了一个例子,一样有问题。但是VB C#的就没有。
http://www.experts-exchange.com/Programming/Programming_Languages/Delphi/Q_20270402.html
 
跟踪的结果是,Get_Properties返回后出的错。
怀疑与这个有关。但是出错的地方是COM的内部调用,不晓得是什么错误。
Get_Properties 返回nil;要出错。
改成这样:
var
Provider: PropertiesProvider;
begin
Provider := CoPropertiesProvider.Create;
try
Result := Provider.GetPropertiesForObject(Self);
finally
Provider := nil;
end;
end;
还是要出错。
 
后退
顶部