易语言 html 服务器,易语言模拟网页Web服务器源代码

.版本 2

.支持库 internet

.子程序 __启动窗口_创建完毕

' 实在是无聊，做了一个WEB服务器，可以把对方的网站拿回来模拟

' 程序运行后在IE地址栏里面打 可以发现网站

' 如果你简直不明白什么含义就算了吧易语言web服务器，祝各位用的开心，新年快乐

' 在常量数据表里可以更改头文件易语言web服务器，也就是网页的开头，自己试试吧

模拟网站 ＝ “”' 要模拟的网站，我就模拟百度啦，网站最后不要加/

服务器1.端口 ＝ 80' 这里可以修改你的端口，默认为80，更改以后，网站地址变成 :端口/

.子程序 _服务器1_数据到达

.局部函数 数据, 文本型

.局部函数 寻找, 整数型

.局部变量 寻找2, 整数型

.局部变量 欲发送数据, 文本型

数据 ＝ 到文本 (服务器1.取回数据 ())

寻找 ＝ 寻找文本 (数据, “GET ”, , 假)<