关于COM+调用,急,100分! ( 积分: 100 )

  • 主题发起人 主题发起人 dennisfox
  • 开始时间 开始时间
D

dennisfox

Unregistered / Unconfirmed
GUEST, unregistred user!
我在webservice调用COM+(按李先生的方式)
CreateOleObject('Project2.testcom1');
但是报无效的被呼叫方;
但是如果我直接在客户端调用就没有问题!很奇怪
如能回答立刻给分!
开发工具为:D7
 
我在webservice调用COM+(按李先生的方式)
CreateOleObject('Project2.testcom1');
但是报无效的被呼叫方;
但是如果我直接在客户端调用就没有问题!很奇怪
如能回答立刻给分!
开发工具为:D7
 
难道没有人回答吗?真的很急!
 
代码如下:
function Twebservice1.QueryMyData(const sSQLCommand: WideString;
var vData: string): Integer;
var
vObj: Variant;
begin
CoInitialize(nil);
try
vObj := CreateOleObject('Project2.testcom1');
vObj.QueryMyData(sSQLCommand, vData);
Result := S_OK;
finally
CoUninitialize;
end;

end;
 
你的COM+注册了吗?或者搜索路径中能找到吗?
 
com+,已经注册,
在客户端直接调用
procedure TForm4.btn3Click(Sender: TObject);
var
vCom : Variant;
vData : OleVariant;
begin
vCom := CreateOleObject('Project2.testcom1');
vCom.QueryMyData(edt1.Text, vData);
Self.ds1.Active := False;
Self.ds1.XMLData := vData;
end;

没有问题
 
搜索路径指什么?
 
如果要源码进行调试,可留下mail!谢谢!!
 
用CoXXX.create方法可以吗?
 
to 张鸿林
能说的具体点吗,比如给个例子!谢谢!!
 
imzyf@sina.com
一起研究,共同进步
 
to 张鸿林
用CoXXX.create方法可以吗?
是可以的,但是我想用名称的方式调用!
怎么搞定他?
帮忙呀!
 
后退
顶部