X
xingyanwei
Unregistered / Unconfirmed
GUEST, unregistred user!
我做了一个DCOM的服务,然后作了一个客户端调用。
现在这个客户端在我机器上调用完全没有问题,
但是将程序拷到我旁边的机器上就无法调用了,出现两种错误
1.拒绝访问
2.RPC资源不可用(好像是这样)
请问大家谁有经验,帮帮我,谢谢!
procedure TForm1.btn1Click(Sender: TObject);
var
upd : Ixnhjk;
resa : Integer;
begin
resa := 0;
// upd := Coxnhjk.CreateRemote('xyw');
// upd := Coxnhjk.CreateRemote('lwl');
upd := Coxnhjk.CreateRemote('luckynavy');
upd.Update(edt1.Text,edt2.Text,edt3.Text,resa);
if resa = 0 then
ShowMessage('失败')
else
ShowMessage('成功');
end;
现在这个客户端在我机器上调用完全没有问题,
但是将程序拷到我旁边的机器上就无法调用了,出现两种错误
1.拒绝访问
2.RPC资源不可用(好像是这样)
请问大家谁有经验,帮帮我,谢谢!
procedure TForm1.btn1Click(Sender: TObject);
var
upd : Ixnhjk;
resa : Integer;
begin
resa := 0;
// upd := Coxnhjk.CreateRemote('xyw');
// upd := Coxnhjk.CreateRemote('lwl');
upd := Coxnhjk.CreateRemote('luckynavy');
upd.Update(edt1.Text,edt2.Text,edt3.Text,resa);
if resa = 0 then
ShowMessage('失败')
else
ShowMessage('成功');
end;