易语言如何连接服务器？

版本 2

支持库 mysql

子程序 _按钮1_被单击

局部变量 b, 整数型

局部变量 取查询值, 整数型

局部变量 MySQL语句, 文本型

局部变量 记录数量, 整数型

局部变量 i, 整数型

局部变量 姓名, 文本型

b ＝ 连接MySql (“12026”, “root”, “123445”, “user”, 3306)

输出调试文本 (b)

MySQL语句 ＝ “select from user_table”

执行SQL语句 (b, MySQL语句)

取查询值 ＝ 取记录集 (b)

记录数量 ＝ 取记录集行数 (取查询值)

输出调试文本 (记录数量)

计次循环首 (记录数量, i)

读字段值 (取查询值, “username”, 姓名)

如果 (姓名 ＝ “admin”)

信息框 (“已找到”, 0, , )

跳出循环 ()

否则

如果结束

' //输出调试文本 (姓名)

到下一行 (取查询值)

计次循环尾 ()

-来源于网络

利用服务器控件和客户控件可以做出一个局域网的登录、控制系统源码如下： 版本

2

支持库

sock程序集

窗口程序集1

程序集变量

用户,

文本型

程序集变量

密码,

文本型子程序

__启动窗口_创建完毕

局部变量

IP,

文本型,

,

"0"IP

＝

取本机IP

()

编辑框1内容

＝

IP

[1]子程序

_服务器_数据到达

局部变量

数据,

文本型数据

＝

删首尾空

(到文本

(服务器取回数据

()))

用户

＝

取文本左边

(数据,

寻找文本

(数据,

“#”,

,

真)

－

1)

密码

＝

取文本右边

(数据,

取文本长度

(数据)

－

寻找文本

(数据,

“#”,

,

真))

信息框

(“有用户登录:”

＋

#换行符

＋

用户

＋

#换行符

＋

密码,

0,

)

子程序

_按钮1_被单击客户连接

(编辑框1内容,

19730)

客户发送数据

(到字节集

(编辑框2内容

＋

“#”

＋

编辑框3内容))

子程序

_服务器_客户进入输出调试文本

(服务器取回客户

())

易语言程序是可以代理的

易语言实现超级代理服务端源码，支持httpsocks4socks5

易语言（EPL）是一门以中文作为程序代码编程语言，其以“易”著称，创始人为吴涛。易语言早期版本的名字为E语言。其最早的版本的发布可追溯至2000年9月11日。创造易语言的初衷是进行用中文来编写程序的实践，方便中国人以中国人的思维编写程序，并不用再去学习西方思维。