• 代码
  新建一个服务器组件（在基本组件里面），左边属性设置好端口
  

.版本 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”), )

• 效果
  http://127.0.0.1:19730/?kk=123&ass=996