D
donkey
Unregistered / Unconfirmed
GUEST, unregistred user!
我创建了一个COM+对象,在本地和局域网内都可以调用,但是我不知道如何在internet上
调用它,在客户端的创建过程如下:
procedure TMainFm.Button2Click(Sender: TObject);
var
qDepart:IcoQuery;
vData:OLEVariant;
begin
//下面这一句是创建远程对象的,在局域网中我填入的是主机名,
//但是在internet上怎么填?我填入IP地址无法正常创建,说
//“没有发现指定的此对象导出者”
//有时也提示:RPC不可用
qDepart := CocomQuery.CreateRemote(Edit1.Text);
qDepart.test(vData);
if vData<>Null then
ShowMessage(vData);
end;
调用它,在客户端的创建过程如下:
procedure TMainFm.Button2Click(Sender: TObject);
var
qDepart:IcoQuery;
vData:OLEVariant;
begin
//下面这一句是创建远程对象的,在局域网中我填入的是主机名,
//但是在internet上怎么填?我填入IP地址无法正常创建,说
//“没有发现指定的此对象导出者”
//有时也提示:RPC不可用
qDepart := CocomQuery.CreateRemote(Edit1.Text);
qDepart.test(vData);
if vData<>Null then
ShowMessage(vData);
end;