开启辅助访问 切换到宽版

精易论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

用微信号发送消息登录论坛

新人指南 邀请好友注册 - 我关注人的新帖 教你赚取精币 - 每日签到


求职/招聘- 论坛接单- 开发者大厅

论坛版规 总版规 - 建议/投诉 - 应聘版主 - 精华帖总集 积分说明 - 禁言标准 - 有奖举报

查看: 252|回复: 2
收起左侧

[易语言] 关于大文件分片上传的问题

[复制链接]
结帖率:29% (2/7)
发表于 2024-9-19 23:00:22 | 显示全部楼层 |阅读模式   四川省成都市
需要把文件分片并上传,源码我已上传,应该是运行不了的,我只截取了分片的这块。
读入文件  现在要么报内存错误,要么显示长度是0
还是循环上传逻辑好像有点错误。
  
窗口程序集名保 留  保 留备 注
窗口程序集_启动窗口   
子程序名返回值类型公开备 注
_按钮1_被单击  

子程序名返回值类型公开备 注
向上取整整数型 
参数名类 型参考可空数组备 注
x双精度小数型
如果真 (x > 四舍五入 (x, ))
返回 (四舍五入 (x, ) + 1)
返回 (四舍五入 (x, ))
子程序名返回值类型公开备 注
大文件分片上传  
参数名类 型参考可空数组备 注
文件路径文本型
上传的文件ID文本型
n整数型
变量名类 型静态数组备 注
文件大小整数型 
文件字节集字节集 
i整数型 
文件分割次数整数型 
发送数据文本型 
返回json类_json 
分片上传URL文本型 
拆分字节集字节集 
上传结果文本型 
PUT结果文本型 
测试文件文本型 
测试大小整数型 
文件号获取整数型 
' 文件号获取 = 读入文件 (文件路径)
' 调试输出 (“文件号:”, 文件号获取)
文件字节集 = 读入文件 (文件路径)
' 文件字节集 = 文件_打开 (文件路径, 1)
调试输出 (“文件路径:”, 文件路径)
文件大小 = 取字节集长度 (文件字节集)
调试输出 (“文件大小:”, 文件大小)
文件分割次数 = 向上取整 (文件大小 ÷ #文件分片大小 )
如果真 (文件大小 ≥ #文件分片大小 )
发送数据 = “{”#引号“preuploadID”#引号“:”#引号到文本 (上传的文件ID)#引号“,”#引号“sliceNo”#引号“:”到文本 (1)“}”
返回json.清除 ()
上传结果 = 编码_Utf8到Ansi (网页_访问_对象 ( #API_123云盘“/upload/v1/file/get_upload_url”, 1, 发送数据, , , 获取HEADER_123 ()))
调试输出 (“分片上传结果”, 上传结果)
返回json.解析 (上传结果)
返回json.解析 (编码_Utf8到Ansi (网页_访问_对象 ( #API_123云盘“/upload/v1/file/get_upload_url”, 1, 发送数据, , , 获取HEADER_123 ())))
分片上传URL = “”
如果真 (返回json.取通用属性 (“message”)“ok”)
分片上传URL = 返回json.取通用属性 (“data.presignedURL”)
PUT结果 = 分片PUT上传 (分片上传URL, 文件字节集)
调试输出 (“PUT结果:”, PUT结果)
超级列表框_上传列表.置标题 (n - 1, 3, “完成100%”)
计次循环首 (文件分割次数, i)
拆分字节集 = 字节集_取指定位置字节集 (文件字节集, (i - 1) × #文件分片大小 + 1, #文件分片大小 )
发送数据 = “{”#引号“preuploadID”#引号“:”#引号到文本 (上传的文件ID)#引号“,”#引号“sliceNo”#引号“:”到文本 (i)“}”
返回json.清除 ()
上传结果 = 编码_Utf8到Ansi (网页_访问_对象 ( #API_123云盘“/upload/v1/file/get_upload_url”, 1, 发送数据, , , 获取HEADER_123 ()))
调试输出 (“分片上传结果”, 上传结果)
返回json.解析 (上传结果)
分片上传URL = “”
如果真 (返回json.取通用属性 (“message”)“ok”)
分片上传URL = 返回json.取通用属性 (“data.presignedURL”)
PUT结果 = 分片PUT上传 (分片上传URL, 文件字节集)
调试输出 (“PUT结果:”, PUT结果)
分片PUT上传 (分片上传URL, 文件字节集)
超级列表框_上传列表.置标题 (n - 1, 3, “完成”到文本 (四舍五入 (i ÷ 文件分割次数, 1)) + “%”)  ' 模拟进度状态
程序_延时 (1, 1)
计次循环尾 ()
子程序名返回值类型公开备 注
分片PUT上传文本型 
参数名类 型参考可空数组备 注
上传URL文本型
上传数据字节集
变量名类 型静态数组备 注
返回信息文本型 
返回信息 = 编码_Utf8到Ansi (网页_访问_对象 (上传URL, 3, , , , 获取HEADER_123 (), , , , 上传数据))
返回 (返回信息)


i支持库列表   支持库注释   
spec特殊功能支持库
iext扩展界面支持库一


回答提醒:如果本帖被关闭无法回复,您有更好的答案帮助楼主解决,请发表至 源码区 可获得加分喔。
友情提醒:本版被采纳的主题可在 申请荣誉值 页面申请荣誉值,获得 1点 荣誉值,荣誉值可兑换荣誉会员、终身vip用户组。
快捷通道:申请荣誉值无答案申请取消悬赏投诉有答案未采纳为最佳
结帖率:100% (5/5)

签到天数: 9 天

发表于 2024-9-20 00:30:58 | 显示全部楼层   广东省佛山市
用读入文件就已经不适合大文件了,换成打开文件
回复 支持 反对

使用道具 举报

结帖率:29% (2/7)

签到天数: 7 天

 楼主| 发表于 2024-9-21 00:57:44 | 显示全部楼层   四川省成都市
1111321ADSFAFSDAFSADF
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则 致发广告者

发布主题 收藏帖子 返回列表

sitemap| 易语言源码| 易语言教程| 易语言论坛| 易语言模块| 手机版| 广告投放| 精易论坛
拒绝任何人以任何形式在本论坛发表与中华人民共和国法律相抵触的言论,本站内容均为会员发表,并不代表精易立场!
论坛帖子内容仅用于技术交流学习和研究的目的,严禁用于非法目的,否则造成一切后果自负!如帖子内容侵害到你的权益,请联系我们!
防范网络诈骗,远离网络犯罪 违法和不良信息举报电话0663-3422125,QQ: 793400750,邮箱:wp@125.la
网站简介:精易论坛成立于2009年,是一个程序设计学习交流技术论坛,隶属于揭阳市揭东区精易科技有限公司所有。
Powered by Discuz! X3.4 揭阳市揭东区精易科技有限公司 ( 粤ICP备12094385号-1) 粤公网安备 44522102000125 增值电信业务经营许可证 粤B2-20192173

快速回复 返回顶部 返回列表