.版本 2
.支持库 spec
.子程序 _服务器1_数据到达
.局部变量 客户端ID, 文本型
.局部变量 请求数据, 文本型
.局部变量 请求行, 文本型
.局部变量 参数部分, 文本型
.局部变量 参数数组, 文本型, , "0"
.局部变量 i, 整数型
.局部变量 参数键值, 文本型, , "0"
请求数据 = 到文本 (服务器1.取回数据 ())
请求行 = 取文本左边 (请求数据, 寻找文本 (请求数据, #换行符, , 假) - 1)
客户端ID = 服务器1.取回客户 ()
' 提取GET参数
.如果真 (寻找文本 (请求行, “GET”, , 假) ≠ -1)
参数部分 = 取文本中间 (请求行, 寻找文本 (请求行, “?”, , 假) + 1, 寻找文本 (请求行, “ HTTP/”, , 假) - 寻找文本 (请求行, “?”, , 假) - 1)
.如果真结束
' URL解码
参数部分 = 编码_URL解码 (参数部分, 真)
参数数组 = 分割文本 (参数部分, “&”, )
.如果真 (取数组成员数 (参数数组) ≥ 1 且 参数数组 [1] ≠ “”)
.计次循环首 (取数组成员数 (参数数组), i)
参数键值 = 分割文本 (参数数组 [i], “=”, )
.如果真 (取数组成员数 (参数键值) = 2)
' 这里可以将参数存入哈希表或变量
调试输出 (“参数名:” + 参数键值 [1] + “,参数值:” + 参数键值 [2])
.如果真结束
.计次循环尾 ()
.如果真结束
' 构造响应
服务器1.发送数据 (客户端ID, 到字节集 (“HTTP/1.1 200 OK” + #换行符 + “Content-Length:” + 到文本 (取字节集长度 (到字节集 (“OKshoudao”))) + #换行符 + “Content-Type:text/html” + #换行符) + 到字节集 (“OKshoudao”), )
无标签
版权属于:chenfirm
作品采用
知识共享署名-非商业性使用-相同方式共享 4.0 国际许可协议 进行许可