精易论坛

标题: 易语言的一个字节集post访问,改写成E4A [打印本页]

作者: 小米加鸡蛋    时间: 2024-7-24 22:15
标题: 易语言的一个字节集post访问,改写成E4A
  
子程序名返回值类型公开备 注
上传文件文本型 
参数名类 型参考可空数组备 注
服务器_地址文本型
服务器文件名文本型
本地文件路径文本型
文件字节集
变量名类 型静态数组备 注
局_网址文本型 
局_方式整数型 
局_提交数据字节集 
ADD_协议头类_POST数据类 
局_提交协议头文本型 
局_结果字节集 
局_返回文本型 
局_网址 = 服务器_地址
局_方式 = 1
局_提交数据 = 到字节集 (“----------------------------761452601140280315160516”#换行符 )
局_提交数据 = 局_提交数据 + 到字节集 (“Content-Disposition: form-data; name=”#引号“file”#引号“; filename=”#引号 + 服务器文件名 + #引号“”#换行符 )
局_提交数据 = 局_提交数据 + 到字节集 (“Content-Type: image/jpeg”#换行符“”#换行符 )
如果真 (文件 ≠ {  } 本地文件路径 = “”)
局_提交数据 = 局_提交数据 + 文件 + 到字节集 ( #换行符 )
如果真 (本地文件路径 ≠ “” 文件 = {  })
局_提交数据 = 局_提交数据 + 读入文件 (本地文件路径)到字节集 ( #换行符 )
局_提交数据 = 局_提交数据 + 到字节集 (“----------------------------761452601140280315160516”)
ADD_协议头.添加 (“User-Agent”, “Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/50.0.2661.87 Safari/537.36”, )
ADD_协议头.添加 (“Content-Type”, “multipart/form-data; boundary=--------------------------761452601140280315160516”, )
局_提交协议头 = ADD_协议头.获取协议头数据 ()
局_结果 = 网页_访问_对象 (局_网址, 局_方式, , , , 局_提交协议头, , , , 局_提交数据, , , , , , , , , )
局_返回 = 到文本 (编码_Utf8到Ansi (局_结果))
返回 (局_返回)







易语言的一个字节集post访问,改写成E4A













PHP上传文件到服务器例子.e

959.17 KB, 下载次数: 2, 下载积分: 精币 -2 枚


作者: 4834    时间: 2024-7-24 23:29
论坛比较少用原生组件做的登录UI,用EXUI打包时又要多带上一个文件,于是自己研究了一个,大佬勿喷。
作者: bsliu    时间: 2025-5-27 14:33
6666666666666666666




欢迎光临 精易论坛 (https://125.confly.eu.org/) Powered by Discuz! X3.4