是使用webservice还是com+, 建议学习webservice的调用吧。 小例子: var ss:ServiceSoap; hello:WideString; begin try HTTPRIO1.WSDLLocation := edtAddress.Text; HTTPRIO1.Service := edit3.Text; HTTPRIO1.Port := edit4.Text; ss := (HTTPRIO1 as ServiceSoap); hello:= 'hello'; Memo1.Lines.Add(ss.EchoInt(234)); except on e : exception do showmessage(e.Message); end; end;
建议学习webservice的调用吧。
小例子:
var
ss:ServiceSoap;
hello:WideString;
begin
try
HTTPRIO1.WSDLLocation := edtAddress.Text;
HTTPRIO1.Service := edit3.Text;
HTTPRIO1.Port := edit4.Text; ss := (HTTPRIO1 as ServiceSoap);
hello:= 'hello';
Memo1.Lines.Add(ss.EchoInt(234));
except
on e : exception do
showmessage(e.Message);
end;
end;
这本书讲了不了三层的内容