[请求]谁用过MSSOAP.SoapClient技术实现websevice**

zykj

procedure TMAINFORM.Button2Click(Sender: TObject);
var
  vwsobj: Variant;
  str: String;
  LGet: System.DispatchHelper;
  o: Object;
begin
  o := Business.System.ComObj.CreateOleObject('MSSOAP.SoapClient');
  lget := System.DispatchHelper.Create(o);
  lget.InvokeMethod('mssoapinit',['http://www.webxml.com.cn/webservices/qqOnlineWebService.asmx?wsdl']);
  str := lget.InvokeMethod('qqCheckOnline',[Edit1.Text]).ToString;
  jsdialogs.ShowMsg(str,'');
  (o as System.IDisposable).Dispose;
end;

zykj

要不要安装MSSOAP.SoapClient软件，有谁做过 分享一下

lixy

http://bbs.justep.com/forum.php?mod=viewthread&tid=28829