摘要:
procedure ws: WebServiceSoap; H: XXXHeader;begin ws := GetWebServiceSoap; H := XXXHeader.Create; try H.Username := ‘xxx’; H.Password := MD5(‘xxx’); (ws as ISOAPHeaders).Send(H); ws.someMethod; finally H.Free; ws := nil; end;end; 阅读全文
posted @ 2014-01-10 18:11 大悟还俗_2 阅读(526) 评论(0) 推荐(0) 编辑