易语言 网络服务器 如何实现单个客户端并行传输多个文件到服务器

服务器代码如下:

版本 2

子程序 _服务器1_数据到达

局部变量 待分割数据, 字节集

局部变量 分割数据, 字节集, , "0"

局部变量 文件1, 字节集

局部变量 文件2, 字节集

待分割数据 ＝ 服务器1取回数据 ()

分割数据 ＝ 分割字节集 (服务器1取回数据 (), 到字节集 (“&分割号&”), )

如果真 (取数组成员数 (分割数据) ＝ 3)

文件1 ＝ 分割数据 [1]

文件2 ＝ 分割数据 [2]

文件3 ＝ 分割数据 [3]

客服端代码如下:

版本 2

子程序 _按钮1_被单击

客户1发送数据 (“文件1” ＋ “&分割号&” ＋ “文件2” ＋ “&分割号&” ＋ “文件3”)

思路就是这样,应该会看明白吧

a的程序

组件：客户，编辑框，按钮

__启动窗口_创建完毕

客户1连接（“IP地址”，19730）‘b程序的“服务器”组件的端口 ’打开b程序之后在打开A程序

_按钮1_被单击

客户1发送数据（编辑框1内容）

_客户1_数据到达

编辑框1内容=到文本（客户1取回数据（））

b的程序

组件：服务器，编辑框，按钮

程序集变量：客户

_服务器1_客户进入

客户=服务器1取回客户（）

_服务器1_数据到达

编辑框1内容=到文本（服务器1取回数据（））

_按钮1_被单击

服务器1发送数据（客户，编辑框1内容）

纯手打，希望楼主看得懂

客户端发送数据（到字节集（“标识”+“文件名称”+“|”）+读入文件（路径））-------------------------服务器端未处理=服务器取回数据（）如果真（“标识”=到文本（取字节集左边（未处理，4））数组=分割字节集（取字节集右边（未处理，取字节集长度（未处理）-4），到字节集（“|”））写到文件（取运行目录（）+“\”+到文本（数组[1]）,数组[2]）