三层高手请-->中间层提示"Interface not support!"，如何解决

Question

用Delphi+DCOM开发三层应用系统，在登录时，执行到以下语句提示出错class function Codata_interface.CreateRemote(const MachineName: string): Idata_interface;
begin
  Result := CreateRemoteComObject(MachineName, CLASS_data_interface) as Idata_interface;
end;其错误信息:  Interface not support！有的机器会，有的机器不会，真奇怪

Answer 1

有啊，我还用regsvr32注册了呢

Answer 2

我也遇到过这种头大的问题，配置好DCOM太烦，以后改Socket了

Answer 3

应该是Idata_interface没有在机器上注册造成的，需要在机器上运行一下服务器程序，注册interface。
改用socket就没有此毛病了。

Answer 4

这是DCOM的问题，要在同一个域内就没有问题。最好是建同样的用户

Answer 5

to chechy(为程序而奋斗) : 如何注册Idata_interface?

Answer 6

我不是说了，只要运行一下服务器程序就可以了。
或者用regsvr32注册该服务器程序产生的*.tlb文件。