HpSocket的Http文件接收服务器,传输不完整

卌卌卌

HpSocket的Http文件接收服务器

在本地局域网传输完整没问题，但是放服务器后，就老是传输不完整，懂得大佬帮忙改改，谢谢



Http文件接收服务器源码.rar (2.52 MB, 下载次数: 29)

2024-11-1 09:06 上传

点击文件名下载附件

147888123

https://bbs.125.la/thread-14839277-1-1.html 我把改好的发出来了，去看看，不限制大小，主要就是对字节集进行了分割

卌卌卌

  

子程序名	返回值类型	公开	备 注
TCP数据到达	整数型
参数名	类 型	参考	可空	数组	备 注
进程句柄	整数型
通信ID	整数型
数据指针	整数型
数据长度	整数型

变量名	类 型	静态	数组	备 注
图片	文本型
jsonQA	类_json
OCR结果	文本型
ID号	文本型
错误信息	文本型
自定义	文本型
分组	文本型
参数	文本型
数据文本	文本型
字节集数据	字节集
SD	长整数型
DAS	长整数型
文件号	长整数型
临时成员	成员信息

字节集数据 ＝ 指针_到字节集 (数据指针, 数据长度)
数据文本 ＝ 到文本 (字节集数据)
进入许可区 (许可证)
判断循环首 (取数组成员数 (成员信息) ＜ 通信ID)
标签1.标题 ＝ “通信ID：” ＋ 到文本 (通信ID)
Web_初始化 (数据文本)
加入成员 (成员信息, 临时成员)
成员信息 [通信ID].文件长度 ＝ 到长整数 (Web_获取GET参数 (“cd”))
成员信息 [通信ID].文件路径 ＝ 取运行目录 () ＋ “\” ＋ Web_获取GET参数 (“name”)
成员信息 [通信ID].md5 ＝ Web_获取GET参数 (“md5”)
文件号 ＝ 打开文件A (取运行目录 () ＋ “\” ＋ Web_获取GET参数 (“name”), #重写文件, )
成员信息 [通信ID].文件号 ＝ 文件号
退出许可区 (许可证)
返回 (0)
判断循环尾 ()
' ------------------------------------------------------------
写文件字节集 (成员信息 [通信ID].文件号, 字节集数据)
如果真 (取文件大小 (成员信息 [通信ID].文件号) ≥ 成员信息 [通信ID].文件长度)
调试输出 (取文件大小 (成员信息 [通信ID].文件号), 成员信息 [通信ID].文件长度)
关闭文件句柄 (成员信息 [通信ID].文件号)
字节集数据 ＝ 读入文件 (成员信息 [通信ID].文件路径)
调试输出 (成员信息 [通信ID].md5, 成员信息 [通信ID].文件路径)
调试输出 (校验_取md5 (字节集数据))
如果真 (校验_取md5 (字节集数据) ＝ 成员信息 [通信ID].md5)
发送数据 (进程句柄, 通信ID, Web_构建返回数据 (到字节集 (“OK”)))
退出许可区 (许可证)
返回 (0)

发送数据 (进程句柄, 通信ID, Web_构建返回数据 (到字节集 (“未知”)))

退出许可区 (许可证)
返回 (0)

i支持库列表	支持库注释
EThread	多线程支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 EThread<br /> .支持库 spec<br /> <br /> .子程序 TCP数据到达, 整数型<br /> .参数 进程句柄, 整数型<br /> .参数 通信ID, 整数型<br /> .参数 数据指针, 整数型<br /> .参数 数据长度, 整数型<br /> .局部变量 图片, 文本型<br /> .局部变量 jsonQA, 类_json<br /> .局部变量 OCR结果, 文本型<br /> .局部变量 ID号, 文本型<br /> .局部变量 错误信息, 文本型<br /> .局部变量 自定义, 文本型<br /> .局部变量 分组, 文本型<br /> .局部变量 参数, 文本型<br /> .局部变量 数据文本, 文本型<br /> .局部变量 字节集数据, 字节集<br /> .局部变量 SD, 长整数型<br /> .局部变量 DAS, 长整数型<br /> .局部变量 文件号, 长整数型<br /> .局部变量 临时成员, 成员信息<br /> <br /> 字节集数据 ＝ 指针_到字节集 (数据指针, 数据长度)<br /> 数据文本 ＝ 到文本 (字节集数据)<br /> 进入许可区 (许可证)<br /> <br /> .判断循环首 (取数组成员数 (成员信息) ＜ 通信ID)<br />     标签1.标题 ＝ “通信ID：” ＋ 到文本 (通信ID)<br />     Web_初始化 (数据文本)<br />     加入成员 (成员信息, 临时成员)<br />     成员信息 [通信ID].文件长度 ＝ 到长整数 (Web_获取GET参数 (“cd”))<br />     成员信息 [通信ID].文件路径 ＝ 取运行目录 () ＋ “\” ＋ Web_获取GET参数 (“name”)<br />     成员信息 [通信ID].md5 ＝ Web_获取GET参数 (“md5”)<br />     文件号 ＝ 打开文件A (取运行目录 () ＋ “\” ＋ Web_获取GET参数 (“name”), #重写文件, )<br />     成员信息 [通信ID].文件号 ＝ 文件号<br />     退出许可区 (许可证)<br />     返回 (0)<br /> .判断循环尾 ()<br /> <br /> <br /> <br /> ' ------------------------------------------------------------<br /> 写文件字节集 (成员信息 [通信ID].文件号, 字节集数据)<br /> <br /> <br /> <br /> .如果真 (取文件大小 (成员信息 [通信ID].文件号) ≥ 成员信息 [通信ID].文件长度)<br /> <br /> <br />     调试输出 (取文件大小 (成员信息 [通信ID].文件号), 成员信息 [通信ID].文件长度)<br /> <br /> <br />     关闭文件句柄 (成员信息 [通信ID].文件号)<br />     字节集数据 ＝ 读入文件 (成员信息 [通信ID].文件路径)<br /> <br />     调试输出 (成员信息 [通信ID].md5, 成员信息 [通信ID].文件路径)<br />     调试输出 (校验_取md5 (字节集数据))<br /> <br />     .如果真 (校验_取md5 (字节集数据) ＝ 成员信息 [通信ID].md5)<br />         发送数据 (进程句柄, 通信ID, Web_构建返回数据 (到字节集 (“OK”)))<br />         退出许可区 (许可证)<br />         返回 (0)<br />     .如果真结束<br /> <br /> <br />     发送数据 (进程句柄, 通信ID, Web_构建返回数据 (到字节集 (“未知”)))<br /> .如果真结束<br /> <br /> <br /> <br /> 退出许可区 (许可证)<br /> 返回 (0)

补充内容 (2024-11-1 09:17):
这是代码，懂得大佬帮忙改改，谢谢

147888123

https://bbs.125.la/thread-14801945-1-1.html 你倒是用这个大佬的代码，一个字都不改。。。优秀，他这个代码是没有问题的，你是想改成网页也能传文件把
他这个代码的问题是分割没有做好，你拿个几K的小文件传，传完后用hex查看两边文件的不同处，逻辑都是没有问题的，改好后，可以单个40G大的文件也没有问题，缺点就是多人同时传输有问题的，你还需要改，我已经用了大半年了，稳定，最好呢你直接拿原版改，这个端的下载有问题，你说局域网没有问题，肯定也是有问题的

卌卌卌

147888123 发表于 2024-11-1 09:49
https://bbs.125.la/thread-14801945-1-1.html 你倒是用这个大佬的代码，一个字都不改。。。优秀，他这个代 ...

？？？？？？？？

147888123

卌卌卌 发表于 2024-11-1 09:53
？？？？？？？？

难道你这个代码不是那个帖子下的吗，我都跟你说了为什么你传输不全的原因了，我干了很多天才发觉他传输的问题，你只要在服务端认真调试就是找到原因的

147888123

https://www.52pojie.cn/thread-1875329-1-1.html 我在这个大佬的源码的启发下，慢慢写了这个乞丐版网盘，所以这个大佬的代码思路都是没问题的，你要自己扩展

卌卌卌

147888123 发表于 2024-11-1 09:54
难道你这个代码不是那个帖子下的吗，我都跟你说了为什么你传输不全的原因了，我干了很多天才发觉他传输的 ...

是这个帖子代码，但是有丢包问题，经常传输不完整

147888123

卌卌卌 发表于 2024-11-1 09:57
是这个帖子代码，但是有丢包问题，经常传输不完整

没有问题，丢包是因为他分割的位置不对，你要自己改，我已经稳定的用了大半年了，就传TXT文件会在文件底部多出一行分隔符，其他没有任何问题，40多G的文件传输后校验一致，他的思路没有任何问题，你要自己改
你要自己调试出通哪里截取字节集，在这前面的字节集都不要，后面的都不要就解决问题了

147888123

卌卌卌 发表于 2024-11-1 09:57
是这个帖子代码，但是有丢包问题，经常传输不完整

我每天要传几百个文件，大文件小文件都有，起码用了7-8个月了，没出现过传输丢包，服务器就是家里的电信宽带做的服务器，反正用的人不多，家宽加电脑就行