Question

我正在寻找可以在PHP和Delphi Soap Server之间进行集成的解决方案。我想通过PHP Soap Client将文件发送到Delphi SOAP Server。将使用TSoapAttachment调用Delphi服务器代码，示例代码如下： -

Ttextminesvc = class(TInvokableClass, Itextminesvc)
  public
 .....
  protected
      function UploadFile(afilename: string; afile: TSoapAttachment): Boolean;
      stdcall;

....... 

function Ttextminesvc.UploadFile(afilename: string; afile: TSoapAttachment): Boolean;
var ffilename: string;
const pathdir = 'C:\tmp';
begin
  result := false;
  ffilename := pathdir + afilename;
  try
    if not directoryexists(pathdir) then
      ForceDirectories(pathdir);
  except
    raise Exception.Create('Unable to create repository directory on the server.');
  end;
  try
    if not fileexists(ffilename) then
    begin
      afile.SaveToFile(ffilename);
      result := true;
    end;
  except
    result := false;
  end;
end;

由于

Answer 1

来自另一篇SO帖子（http://stackoverflow.com/questions/3663416/php-soap-file-upload）：
“你可以传输你喜欢的任何数据。你只需要对二进制数据进行base64编码。它会将它转换为ascii字符。然后你可以像普通的字符串变量一样传输它。唯一的想法是你需要注意的是服务器限制。 “

Delphi SOAP Server，带有文件附件，PHP作为客户端

1 个答案: