请问这个POST怎么提交 OCR POST - 精易论坛

子程序名	返回值类型	公开	备注
皮卡智能抠图
参数名	类型	参考	可空	数组	备注
图片	字节集
背景颜色	整数型				10进制RGB颜色如果为空或0则为透明
皮卡APPCode	文本型
图片名	文本型

变量名	类型	静态	数组	备注
post数据类	类_POST数据类_字节集
boundary	文本型
返回结果	文本型
提交字节集	字节集
十六进制颜色	文本型

' --0b9ebb77-a3ce-4da2-9482-6a1145460007
' Content-Disposition: form-data; name="file"; filename="文件名.bmp"
' Content-Type: image/bmp; charset=UTF-8
' Content-Transfer-Encoding: binary
' 图片字节集
' --0b9ebb77-a3ce-4da2-9482-6a1145460007
' Content-Disposition: form-data; name="bgcolor"
' FFFFFF
' --0b9ebb77-a3ce-4da2-9482-6a1145460007--
boundary ＝程序_生成GUID ()
post数据类.添加 (“file”, 图片, “image/bmp; charset=UTF-8” ＋ #换行符＋ “Content-Transfer-Encoding: binary”, boundary ＋ “.bmp”)

如果真 (背景颜色 ≠ 0)

十六进制颜色＝颜色_RGB十进制到十六进制 (背景颜色)

post数据类.添加 (“bgcolor”, 到字节集 (十六进制颜色), , )
提交字节集＝ post数据类.获取Post数据 (boundary, 2)
返回结果＝到文本 (网页_访问 (“https://picupapi.tukeli.net/api/v1/matting2?mattingType=6”, 1, , , , “Content-Type:multipart/form-data;boundary=” ＋ boundary ＋ #换行符＋ “APIKEY:” ＋皮卡APPCode, , , 提交字节集, , , , , ))
返回结果＝编码_utf8到gb2312 (返回结果)

如果真 (json.解析 (返回结果, 真, ) ＝真)

图片＝编码_BASE64解码A (到字节集 (json.取通用属性 (“data.imageBase64”, )), )

如果真 (目录_是否存在 (取运行目录 () ＋ “\处理结果”) ＝假)

目录_创建 (取运行目录 () ＋ “\处理结果”)

写到文件 (取运行目录 () ＋ “\处理结果\” ＋图片名, 图片)

.版本 2<br />
<br />
.子程序 皮卡智能抠图<br />
.参数 图片, 字节集<br />
.参数 背景颜色, 整数型, 可空, 10进制RGB颜色 如果为空或0则为透明<br />
.参数 皮卡APPCode, 文本型<br />
.参数 图片名, 文本型<br />
.局部变量 post数据类, 类_POST数据类_字节集<br />
.局部变量 boundary, 文本型<br />
.局部变量 返回结果, 文本型<br />
.局部变量 提交字节集, 字节集<br />
.局部变量 十六进制颜色, 文本型<br />
<br />
' --0b9ebb77-a3ce-4da2-9482-6a1145460007<br />
' Content-Disposition: form-data; name="file"; filename="文件名.bmp"<br />
' Content-Type: image/bmp; charset=UTF-8<br />
' Content-Transfer-Encoding: binary<br />
<br />
' 图片字节集<br />
' --0b9ebb77-a3ce-4da2-9482-6a1145460007<br />
' Content-Disposition: form-data; name="bgcolor"<br />
<br />
' FFFFFF<br />
' --0b9ebb77-a3ce-4da2-9482-6a1145460007--<br />
<br />
boundary ＝ 程序_生成GUID ()<br />
post数据类.添加 (“file”, 图片, “image/bmp; charset=UTF-8” ＋ #换行符 ＋ “Content-Transfer-Encoding: binary”, boundary ＋ “.bmp”)<br />
.如果真 (背景颜色 ≠ 0)<br />
    十六进制颜色 ＝ 颜色_RGB十进制到十六进制 (背景颜色)<br />
    post数据类.添加 (“bgcolor”, 到字节集 (十六进制颜色), , )<br />
.如果真结束<br />
提交字节集 ＝ post数据类.获取Post数据 (boundary, 2)<br />
返回结果 ＝ 到文本 (网页_访问 (“<a href="https://picupapi.tukeli.net/api/v1/matting2?mattingType=6" target="_blank">https://picupapi.tukeli.net/api/v1/matting2?mattingType=6</a>”, 1, , , , “Content-Type:multipart/form-data;boundary=” ＋ boundary ＋ #换行符 ＋ “APIKEY:” ＋ 皮卡APPCode, , , 提交字节集, , , , , ))<br />
返回结果 ＝ 编码_utf8到gb2312 (返回结果)<br />
.如果真 (json.解析 (返回结果, 真, ) ＝ 真)<br />
    图片 ＝ 编码_BASE64解码A (到字节集 (json.取通用属性 (“data.imageBase64”, )), )<br />
    .如果真 (目录_是否存在 (取运行目录 () ＋ “\处理结果”) ＝ 假)<br />
        目录_创建 (取运行目录 () ＋ “\处理结果”)<br />
    .如果真结束<br />
    写到文件 (取运行目录 () ＋ “\处理结果\” ＋ 图片名, 图片)