易语言多功能web服务器,vServer WEB服务器模块源码

资源介绍：

vServer WEB服务器

支持GZIP压缩,大大降低数据体积

支持自定义头信息

资源作者：

易学三叶编程网

资源界面：.版本 2

.支持库 sock

.支持库 EThread

.支持库 spec

.程序集 程序集1

.程序集变量 服务器, 网络服务器

.程序集变量 处理程序, 子程序指针

.程序集变量 接收数据, 字节集

.子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行

写到文件 (取当前目录 () ＋ “\gzip.dll”, #gzip_dll)

置文件属性 (取当前目录 () ＋ “\gzip.dll”, 4)

返回 (0)  ' 可以根据您的需要返回任意数值

.子程序 启动服务器, , 公开

.参数 端口, 整数型, , 没有被占用的端口

.参数 访问事件处理程序, 子程序指针, , 需要一个参数接收句柄

服务器.启动 (端口)

处理程序 ＝ 访问事件处理程序

启动线程 (&监听服务器, , )

.子程序 监听服务器

.局部变量 句柄, 整数型

.局部变量 成功, 逻辑型

句柄 ＝ 服务器.监听 (0)

.如果真 (句柄 ＞ -1)

接收数据 ＝ 服务器.接收 (句柄, 0, 成功)

.如果真 (成功)

调用子程序 (处理程序, , , 句柄)

.如果真结束

' 本源码来自三叶资源网(www.sanye.cx)