上传速度问题

cherryy

多线程上传会出现0的情况，会有断断续续的，大佬们知道这是怎么回事吗？ 用的鱼刺

上传的时候套用鱼刺的线程，调用的子程序 读写有一处加了许可证，有一处 网页访问 上传数据用的，再后面有一个 程序_延时 (50, )，多线程按道理来说是连着跑的，没理由跑完一次等下再跑吧，大佬们帮我看看，分析下大概是什么原因造成的？

  

总任务 ＝ partCount
并发线程 ＝ 到整数 (编辑框_线程数.内容)
如果真 (并发线程 ＞ 总任务)
并发线程 ＝ 总任务

线程池.创建 (并发线程, 并发线程, , , , , )
判断循环首 (n ＜ 总任务)
空闲数 ＝ 线程池.取_空闲线程数 ()
如果真 (空闲数 ≥ 0)
当前任务数 ＝ 总任务 － n
如果真 (当前任务数 ＞ 空闲数)
当前任务数 ＝ 空闲数
计次循环首 (当前任务数, )
n ＝ n ＋ 1
线程池.投递任务 (&上传子程序, n, )
' 程序_延时 (100, )
计次循环尾 ()
线程池.等待任务动态 (10, )
线程池.等待任务动态 (, )
判断循环尾 ()
如果真 (线程池.取_状态 () ＝ #线程池_正在工作 )
线程池.销毁 (0, )
判断循环首 (线程池.取_状态 () ≠ #线程池_未启动 )
程序_延时 (10, )
判断循环尾 ()

.版本 2<br /> <br /> 总任务 ＝ partCount<br /> 并发线程 ＝ 到整数 (编辑框_线程数.内容)<br /> .如果真 (并发线程 ＞ 总任务)<br />     并发线程 ＝ 总任务<br /> .如果真结束<br /> <br /> 线程池.创建 (并发线程, 并发线程, , , , , )<br /> .判断循环首 (n ＜ 总任务)<br /> <br />     空闲数 ＝ 线程池.取_空闲线程数 ()<br />     .如果真 (空闲数 ≥ 0)<br />         当前任务数 ＝ 总任务 － n<br />         .如果真 (当前任务数 ＞ 空闲数)<br />             当前任务数 ＝ 空闲数<br />         .如果真结束<br />         .计次循环首 (当前任务数, )<br />             n ＝ n ＋ 1<br />             线程池.投递任务 (&上传子程序, n, )<br />             ' 程序_延时 (100, )<br />         .计次循环尾 ()<br />         线程池.等待任务动态 (10, )<br /> <br />     .如果真结束<br />     线程池.等待任务动态 (, )<br /> .判断循环尾 ()<br /> <br /> .如果真 (线程池.取_状态 () ＝ #线程池_正在工作)<br />     线程池.销毁 (0, )<br /> .如果真结束<br /> .判断循环首 (线程池.取_状态 () ≠ #线程池_未启动)<br />     程序_延时 (10, )<br /> .判断循环尾 ()

补充内容 (2024-1-16 10:40):
上传子程序 部分在2楼

cherryy

上传子程序

  

线程_进入许可区 (集_多线程许可证)
fr.移动读写位置_ ( (i － 1) × upSize, #起始位置_FILE_BEGIN )
分包字节集 ＝ fr.读入字节集_ (upSize)
线程_退出许可区 (集_多线程许可证)
分包大小 ＝ 取字节集长度 (分包字节集)
局_临时CRC ＝ 到小写 (校验_取crc32 (分包字节集, 真))
加入成员 (crc文本, 到文本 (i) ＋ “:” ＋ 局_临时CRC)
计次循环首 (20, fg)
URL=“https://hao.******************”
res ＝ 到文本 (网页_访问_对象 (URL, 3, , , , 协议, , , , 分包字节集, , , , , , , , , ))
json.解析 (res, , )
如果 (json.取属性 (“error.code”).取数据文本 () ≠ “200”)
如果 (fg ≠ 20)
程序_延时 (10, )
调试输出 (“上传失败”)
超级列表框1.置标题 (全表索引 － 1, 6, “失败”)
按钮_操作开始.禁止 ＝ 假
返回 ()

调试输出 (分包大小, i, “上传成功”, res)
dx ＝ dx ＋ 取字节集长度 (分包字节集)
百分比 ＝ 四舍五入 (dx ÷ 文件大小 × 100, 2)
超级列表框1.置标题 (全表索引 － 1, 6, 到文本 (百分比) ＋ “%”)
跳出循环 ()

计次循环尾 ()
程序_延时 (50, )

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

.版本 2<br /> .支持库 spec<br /> .支持库 iext<br /> <br /> <br /> 线程_进入许可区 (集_多线程许可证)<br /> fr.移动读写位置_ ((i － 1) × upSize, #起始位置_FILE_BEGIN)<br /> 分包字节集 ＝ fr.读入字节集_ (upSize)<br /> 线程_退出许可区 (集_多线程许可证)<br /> <br /> 分包大小 ＝ 取字节集长度 (分包字节集)<br /> 局_临时CRC ＝ 到小写 (校验_取crc32 (分包字节集, 真))<br /> <br /> 加入成员 (crc文本, 到文本 (i) ＋ “:” ＋ 局_临时CRC)<br /> <br /> .计次循环首 (20, fg)<br />     URL=“https://hao.******************”<br />     res ＝ 到文本 (网页_访问_对象 (URL, 3, , , , 协议, , , , 分包字节集, , , , , , , , , ))<br /> <br />     json.解析 (res, , )<br /> <br />     .如果 (json.取属性 (“error.code”).取数据文本 () ≠ “200”)<br /> <br />         .如果 (fg ≠ 20)<br />             程序_延时 (10, )<br />         .否则<br />             调试输出 (“上传失败”)<br />             超级列表框1.置标题 (全表索引 － 1, 6, “失败”)<br />             按钮_操作开始.禁止 ＝ 假<br />             返回 ()<br /> <br />         .如果结束<br /> <br />     .否则<br />         调试输出 (分包大小, i, “上传成功”, res)<br />         dx ＝ dx ＋ 取字节集长度 (分包字节集)<br />         百分比 ＝ 四舍五入 (dx ÷ 文件大小 × 100, 2)<br />         超级列表框1.置标题 (全表索引 － 1, 6, 到文本 (百分比) ＋ “%”)<br />         跳出循环 ()<br /> <br />     .如果结束<br /> <br /> .计次循环尾 ()<br /> <br /> 程序_延时 (50, )

pnccm

关键应该不应该贴的是上传子程序吗? 你贴的这个是投递任务的流程 这个不是关键点

高先生

服务器上传并行连接数限制为1 分析完毕

cherryy

高先生 发表于 2024-1-15 17:04
服务器上传并行连接数限制为1 分析完毕

不应该，站点原版的没有这种情况

kk4648

&上传子程序
贴出来

洋滨

挂代理试试看

cherryy

沉了，有大佬帮忙看看吗？