该楼层疑似违规已被系统折叠 隐藏此楼查看此楼
.版本 2
.支持库 sock
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
.局部变量 ip地址, 文本型, , "0"
ip地址 = 取本机IP ()
标签1.标题 = ip地址 [1] + “:2220”
.子程序 _服务器1_数据到达
.局部变量 返回内容, 文本型
返回内容 = 到文本 (服务器1.取回数据 ())
客户 = 服务器1.取回客户 ()
.如果 (寻找文本 (返回内容, “Content-wenjianchangdu”, 1, 假) > -1)
文件长度 = 到整数 (取中间文本 (返回内容, “[--]”, “[-+]”))
文件名称 = 取中间文本 (返回内容, “[++]”, “[+-]”)
开启接收 = 1
标签3.标题 = “需接收长度:” + 到文本 (文件长度)
标签2.标题 = “文件名:” + 文件名称
总内容 = 总内容 + 服务器1.取回数据 ()
.否则
.如果 (寻找文本 (返回内容, “Content-Length”, 1, 假) > -1)
服务器1.发送数据 (客户, “HTTP/1.1 200 OK” + #换行符 + “Content-Length: ” + 到文本 (取文本长度 (“错误”)) + #换行符 + #换行符 + “错误