|
发表于 2010-9-8 01:24:48
|
显示全部楼层
海南省海口市
本帖最后由 wqejnyt 于 2010-9-8 01:29 编辑
[e].版本 2
.程序集 窗口程序集1
.程序集变量 a, 文本型, , , 用来存放某一个客户机的IP+端口
.子程序 _服务器1_客户进入, , , 就是客户端连接到服务器的事件
标题 = 服务器1.取回客户 () + “ 连接到服务器!”
a = 服务器1.取回客户 () ' 如果多个客房的话记得a=a+服务器1.取回客户+"一个用来分隔的符号"
' 注意符号就好不要用"."或":"否则有你忙的 这样你就可以用分割文本来进行操作了!
.子程序 _按钮_顶级权限_被单击
.如果真 (a = “”) ' 如果A=""就是没有连接到服务器!
返回 ()
.如果真结束
服务器1.发送数据 (a, “@@弄死TA##”, ) ' 如果连接到服务器的话我们发送这条信息!
[/e]
这个是服务器的源码
[e].版本 2
.支持库 spec
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
客户1.连接 (“192.168.0.1”, 19730) ' 这个192.168.0.1改成你的公网IP(外网IP)!,
.子程序 _客户1_数据到达, , , 接收到服务器发过来的信息!
.局部变量 a, 文本型
a = 到文本 (客户1.取回数据 ())
.如果真 (a = “@@弄死TA##”)
信息框 (“关机了!”, 0, ) ' 当然这里是我为了你可以测试这样写的,你可以把这里改成 关闭系统 (#关机, 真)
.如果真结束
[/e]
这个是客户端的源码 |
|