服务器组件 返回下载内容的例子

超级萌新

  

子程序名	返回值类型	公开	备 注
_服务器1_数据到达

变量名	类 型	静态	数组	备 注
客户	文本型
收到数据	文本型
请求内容	文本型

客户 ＝ 服务器1.取回客户 ()
收到数据 ＝ 到文本 (服务器1.取回数据 ())
请求内容 ＝ 文本_取出中间文本 (收到数据, “GET ”, “HTTP/1.1”) ' 这里自己处理参数
服务器1.发送数据 (客户, “HTTP/1.0 200 OK” ＋ #换行符, )
服务器1.发送数据 (客户, “Content-Type: application/octet-stream” ＋ #换行符, ) ' 设置为二进制文件
服务器1.发送数据 (客户, “Content-Disposition: attachment; filename=” ＋ 请求内容 ＋ “.txt” ＋ #换行符, ) ' 设置下载文件名
服务器1.发送数据 (客户, #换行符, ) ' 分割内容及协议头
服务器1.发送数据 (客户, 到字节集 (请求内容), ) ' 返回的内容 可以设为文本，字节集就是二进制
服务器1.断开客户 (客户) ' 返回后端口链接

.版本 2<br /> <br /> .子程序 _服务器1_数据到达<br /> .局部变量 客户, 文本型<br /> .局部变量 收到数据, 文本型<br /> .局部变量 请求内容, 文本型<br /> <br /> 客户 ＝ 服务器1.取回客户 ()<br /> 收到数据 ＝ 到文本 (服务器1.取回数据 ())<br /> 请求内容 ＝ 文本_取出中间文本 (收到数据, “GET ”, “HTTP/1.1”)'这里自己处理参数<br /> 服务器1.发送数据 (客户, “HTTP/1.0 200 OK” ＋ #换行符, )<br /> 服务器1.发送数据 (客户, “Content-Type: application/octet-stream” ＋ #换行符, )'设置为二进制文件<br /> 服务器1.发送数据 (客户, “Content-Disposition: attachment; filename=” ＋ 请求内容 ＋ “.txt” ＋ #换行符, )'设置下载文件名<br /> 服务器1.发送数据 (客户, #换行符, ) ' 分割内容及协议头<br /> 服务器1.发送数据 (客户, 到字节集 (请求内容), )'返回的内容 可以设为文本，字节集就是二进制<br /> 服务器1.断开客户 (客户)'返回后端口链接

jingyigg

大神，搜遍论坛，终于给我找到服务器组件 返回下载内容方法啦，谢谢，而且还是直接贴出源码，简明扼要

ghost12

大神，请收下我的膝盖

ghost12

这么厉害！必须给个好评鼓励下~

趣冉科技

感谢楼主分享，支持一下~~！！！

趣冉科技

感谢楼主分享，支持一下~~！！！

opq123

FHLS

谢谢分享

sinewtec

谢谢分享

h12345

感谢分享，支持一下