.版本 2
.支持库 internet
.支持库 spec
.程序集 窗口程序集_启动窗口
.子程序 _按钮1_被单击
.局部变量 url, 文本型
.局部变量 data, 字节集
.局部变量 code, 文本型
url = “//www.picdiy.com/s/ashx/y.ashx”
data = 子字节集替换 (到字节集 (#常量1), 到字节集 (“[pic]”), #图片1, , )
code = 到文本 (网页_访问 (url, 1, , , , “Content-Type:multipart/form-data; boundary=----WebKitFormBoundaryGVOwbkxyrzsjUBC3” + #换行符, , , data))
code = “//www.picdiy.com/temp/” + 文本_取出中间文本 (code, “msg:'”, “'”)
图片框1.图片 = HTTP读文件 (code)
调试输出 (code)