网易号自媒体图片上传源码

部分代码：

.版本 2
.支持库 spec

.子程序 网易号上传图片, 文本型
.参数 图片数据, 字节集
.参数 图片格式, 文本型
.局部变量 url, 文本型
.局部变量 head, 文本型
.局部变量 post, 字节集
.局部变量 ret, 文本型
.局部变量 网易号名称, 文本型
.局部变量 网易号ID, 文本型

网易号ID ＝ “”
网易号名称 ＝ “”
url ＝ “http://upload.ws.126.net/picupload?_=” ＋ 时间_取现行时间戳 () ＋ “&wemediaId=” ＋ 网易号ID
head ＝ “Accept: */*” ＋ #换行符 ＋ “Accept-Encoding: gzip, deflate” ＋ #换行符 ＋ “Accept-Language: zh-CN,zh;q=0.9” ＋ #换行符 ＋ “Access-Control-Request-Headers: x-b3-sampled,x-b3-spanid,x-nr-trace-id” ＋ #换行符 ＋ “Access-Control-Request-Method: POST” ＋ #换行符 ＋ “Connection: keep-alive” ＋ #换行符 ＋ “DNT: 1” ＋ #换行符 ＋ “Host: upload.ws.126.net” ＋ #换行符 ＋ “Origin: http://mp.163.com” ＋ #换行符 ＋ “Referer: http://mp.163.com/index.html” ＋ #换行符 ＋ “User-Agent: Mozilla/5.0 (Windows NT 6.1) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/72.0.3626.81 Safari/537.36 SE 2.X MetaSr 1.0”
网页_访问_对象 (url, 4, , , , head)
post ＝ 到字节集 (#网易上传图片)
post ＝ 子字节集替换 (post, 到字节集 (“[图片数据]”), 图片数据, , )
post ＝ 子字节集替换 (post, 到字节集 (“[格式]”), 到字节集 (图片格式), , )
post ＝ 子字节集替换 (post, 到字节集 (“[媒体名称]”), 到字节集 (网易号名称), , )
head ＝ “Accept: application/json” ＋ #换行符 ＋ “Accept-Encoding: gzip, deflate” ＋ #换行符 ＋ “Accept-Language: zh-CN,zh;q=0.9” ＋ #换行符 ＋ “Connection: keep-alive” ＋ #换行符 ＋ “Content-Length: ” ＋ 到文本 (取字节集长度 (post)) ＋ #换行符 ＋ “Content-Type: multipart/form-data; boundary=----WebKitFormBoundaryYSPGJWFtGuD91fjx” ＋ #换行符 ＋ “DNT: 1” ＋ #换行符 ＋ “Host: upload.ws.126.net” ＋ #换行符 ＋ “Origin: http://mp.163.com” ＋ #换行符 ＋ “Referer: http://mp.163.com/index.html” ＋ #换行符 ＋ “User-Agent: Mozilla/5.0 (Windows NT 6.1) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/72.0.3626.81 Safari/537.36 SE 2.X MetaSr 1.0” ＋ #换行符 ＋ “X-B3-Sampled: 1” ＋ #换行符 ＋ “X-B3-SpanId: 0” ＋ #换行符 ＋ “X-NR-Trace-Id: mp_3796833665219561_” ＋ 时间_取现行时间戳 ()
ret ＝ 编码_Utf8到Ansi (网页_GZIP解压 (网页_访问_对象 (url, 1, , , , head, , , , post)))
ret ＝ 文本_取出中间文本 (ret, “url” ＋ #引号 ＋ “:” ＋ #引号, #引号, )
调试输出 (ret)
返回 (ret)

@朱悟能