TidHttp上传文件，PHP接收文件

最新推荐文章于 2023-12-05 14:28:53 发布

Yoie

最新推荐文章于 2023-12-05 14:28:53 发布

阅读量834

点赞数

分类专栏： Delphi

本文链接：https://blog.csdn.net/yoie01/article/details/105529594

版权

Delphi 专栏收录该内容

25 篇文章 2 订阅

订阅专栏

delphi版本 10.2

引用单元

uses
   IdHTTP, IdMultipartFormData,IdGlobalProtocols

delphi端上传代码

function UploadFile(FilePath,Url:String):string;
var
  Http:TidHttp;
  Resp:TStringStream;
  MutPartForm : TIdMultiPartFormDataStream;
begin
  Result:='';
  if FileExists(FilePath) then
    begin
      Http:=TidHttp.Create(nil);
      Resp:=TStringStream.Create;
      MutPartForm := TIdMultiPartFormDataStream.Create;
      try
        //MutPartForm.AddFormField('UserId', 0);       //如果有其他参数使用这个传递
        MutPartForm.AddFile('file', FilePath, GetMIMETypeFromFile(FilePath));
        Http.Post(Url, MutPartForm, Resp);
        Result:=Resp.DataString;
      finally
        Http.Free;
        Resp.Free;
        MutPartForm.Free;
      end;
    end;
end;

PHP端接收代码

<?php
  $fileInfo = $_FILES["file"];
  $fileInfoName = $fileInfo["name"];//文件名
  $fileInfoPath = $fileInfo["tmp_name"];//文件当前路径文件夹
  move_uploaded_file($fileInfoPath,"./MyFiles/".$fileInfoName);//将上传的文件移动到指定目录
?>

*注意：服务器上存放文件的目录需要给予写的权限，否则会无法移动文件