delphi 上传文件到服务器,使用Delphi Indy HTTP组件上载带有表单数据的文件

  • Post author:
  • Post category:其他


我想使用Indy在Delphi中复制这部分Python代码:

postdata = {‘data’: ‘{“data”:{“xMode”:0,”overrideOS”:1,”messageId”:””,”vmProfileList”:”11″,”submitType”:”0″,”url”:””},”filePriorityQ”:”run_now” }’}

file_up = {‘amas_filename’:open(‘/home/samples/temp/vtest32.exe’,’r’)}

file_upload_req=requests.post(url,postdata,files=file_up,headers=headers,verify=False)

我这样尝试过:

Params.AddFormField(‘data’, ‘{“data”:{“xMode”: ‘+ xMode +’,”analyzeAgain”:1,”overrideOS”:1,’ +

‘”vmProfileList”:”‘ + DBProfileID.Value + ‘”,”submitType”:0,”url”:””}}’);

Params.AddFile(‘amas_filename’, DBTestFilePath.Value, GetMIMEType(