易语言客户端连接服务器

呵呵，建议你买一本《信息技术九年级上易语言版》，

客户端（如下代码）：

版本

2

程序集

窗口程序集1

子程序

_按钮1_被单击

如果

(客户1连接

(“127001”,

8888))

否则

信息框

(“连接失败”,

0,

)

如果结束

子程序

_按钮2_被单击

客户1发送数据

(发送编辑框内容)

子程序

_客户1_数据到达

接收编辑框内容

＝

到文本

(客户1取回数据

())

子程序

__启动窗口_创建完毕

服务器（如下代码）：

版本

2

程序集

窗口程序集1

子程序

_服务器1_客户进入

列表框1加入项目

(服务器1取回客户

(),

)

子程序

_服务器1_数据到达

接收编辑框内容

＝

到文本

(服务器1取回数据

())

子程序

_按钮2_被单击

服务器1发送数据

(列表框1取项目文本

(列表框1现行选中项),

发送编辑框内容,

)

方法/步骤

1 打开2次易语言，分别新建一个窗口程序

2 在第一个窗口里添加服务器控件，第二个窗口添加客户控件

3 根据自己情况，这里端口可以根据自己需要去修改，不改也可以，我这里就不改了

4 我们在第二个窗口（放客户控件的）的窗口创建完毕事件里加入以下代码

客户1连接 (“127001”, 19730)

127001是本地服务器，根据自己的情况去修改IP，19730是刚刚设置的端口

5 在第一个窗口（服务器）的_服务器1_数据到达 事件加入以下代码

调试输出（服务器1取回客户 ()）

6 先运行第一个窗口（服务器），再运行第二个窗口（客户），我们可以在第一个窗口的输出窗口里看到客户进入的状况

7 服务器向客户端发送消息可以用 服务器1发送数据（）

我们把刚刚的调试输出（服务器1取回客户 ()）改成

客户 ＝ 服务器1取回客户 ()

添加一个按钮，在按钮单击事件加入服务器1发送数据 (客户, “提示_这只是一个提示”,）

8 在第二个窗口（客户），客户的数据到达事件里加入如下代码

9 现在我们来测试一下效果，先启动第一个窗口（服务器），再启动第二个窗口（客户）

注意：第一个窗口（服务器）有一个按钮，我们点击它，那么第二个窗口会弹出提示框，提示内容为“这只是一个提示”

10 关掉服务器窗口，提示框依然存在，证明确实是客户窗口弹出提示的没错

以上只是一个方法，思路

11 更多的功能需要自己去思考，实现的方法其实都是一个样子的，要学会举一反三

END

简单，客户也就用：客户1连接("IP",端口)和 数据到达 服务器也就 :_服务器_数据到达 ，服务器1发送数据(服务器1取回客户(),到字节集("XXXXXXX"))，就几个命令和事件就可以实现通信了

服务器和客户机 组件是基于连接的TCP通讯方式 必须服务器开启 然后 客户端连接成功后 才能通讯可以考虑使用UDP协议的 数据报 组件数据报是一种不可靠、小数据量的网络数据交互方式。如果传递的数据量过大，有可能会失败，最好不要超过 127 字节。如需要大数据量或者可靠数据传送方式，请使用基于连接的其它网络组件。

在客户端组件，下面有个 “子程序 _客户1_连接断开“ 的事件，当与服务器断开，他会执行此事件下的代码！

你可以在此事件设置：

比如，当如果服务器断开，我需要重新连接服务器。那么此事件下加入命令：

"客户1连接("127001”，19730） 重新与服务器取得连接！

如果不需要重新与服务器连接，只想取到客户端是否与服务器断开。那么，你可以在此事件下面设置一个 程序集变量 或 全局变量 当此事件被调用，就赐值给这个变量，我这里赐 1。然后可以检测此变量的值，如果是1，那么就说明已经和服务器断开了，重新和服务器连接的时候，再赐值给变量为 0 。这样当变量为 1(说明已经断开)，当变量为 0 （说明已经连接）。

请采纳！