导读
易语言5.6完美版,可静态编译,绿色无后门

学习易语言 讲究的是系统,如果你正在四处闲逛,你懂的永远是皮毛! 觅风论坛正在为每个困惑的对易语言 详细

客户端与服务器连接例程

[复制链接]

微信扫一扫 分享朋友圈

雪域美女 发表于 2017-3-17 11:27:23 | 显示全部楼层 |阅读模式 打印 上一主题 下一主题

马上注册,结交更多易友,享用更多功能,让你轻松玩转觅风论坛。

您需要 登录 才可以下载或查看,没有账号?立即注册

x

服务器例程
事件 按钮1.被单击()
        标签1.标题 = "外网IP:" & 取外网IP()
        标签2.标题 = "内网IP:" & WIFI管理1.取内网IP()
        服务器1.启动服务器(8090)  '启动服务器,监听8090端口
结束 事件

事件 服务器1.客户进入(IP地址 为 文本型,端口 为 整数型)
        标签3.标题 = "IP:" & IP地址 & "   端口:" & 端口
结束 事件

事件 服务器1.收到数据(数据 为 字节型(),IP地址 为 文本型,端口 为 整数型)
        弹出提示("收到数据:" & 字节到文本(数据,"GBK") & "IP" & IP地址 & "端口" & 端口)
        服务器1.发送数据(文本到字节("收到信息","GBK"),IP地址,端口)
结束 事件

事件 服务器1.客户离开(IP地址 为 文本型,端口 为 整数型)
        弹出提示("客户离开:" & IP地址)
结束 事件

事件 按钮2.被单击()
        服务器1.关闭服务器()
结束 事件

客户端例程
事件 按钮_连接.被单击()
客户1.连接服务器(编辑框_ip.内容," 8090",5000) ‘输入服务器外网ip
结束 事件
事件 客户1.连接完毕(连接结果 为 逻辑型)
如果 连接结果=真 则
编辑框_ip.可视 = 假
按钮_连接.可视 = 假
标签1.可视 = 假
弹出提示("连接服务器成功")
保存客户("客户1",客户1)
否则
信息框("提示","连接服务器失败!即将退出!","好吧- 。-")
结束程序()
结束  如果
结束 事件
回复

使用道具 举报

精彩评论57

qq1124824221 发表于 2017-3-23 01:40:39 | 显示全部楼层
学习一下!十分感谢
回复 支持 反对

使用道具 举报

呵呵哒 发表于 2017-3-28 15:53:55 | 显示全部楼层
学习了,这就去试试
回复 支持 反对

使用道具 举报

yu1616 发表于 2017-4-3 06:07:11 | 显示全部楼层
顶一个了
回复 支持 反对

使用道具 举报

唉唉唉 发表于 2017-4-8 20:20:27 | 显示全部楼层
碉堡了!
回复 支持 反对

使用道具 举报

柠檬 发表于 2017-4-14 10:33:42 | 显示全部楼层
支持!!!!前排!!!!
回复 支持 反对

使用道具 举报

123456 发表于 2017-4-14 10:34:20 | 显示全部楼层
前来支持~~~~~~~~~~~~~~~~~~~
回复 支持 反对

使用道具 举报

海绵老爹 发表于 2017-4-14 10:34:58 | 显示全部楼层
谢谢楼主,,,收藏ing
回复 支持 反对

使用道具 举报

柠檬 发表于 2017-4-14 10:35:36 | 显示全部楼层
学习一下!十分感谢
回复 支持 反对

使用道具 举报

中国好叔叔 发表于 2017-4-14 10:36:15 | 显示全部楼层
碉堡了!
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关注我们:觅风论坛与你快乐分享

收藏本站

用心服务做个非盈利公益编程网站

www.eyyba.com

服务人:觅风论坛

Email:eyyba@foxmail.com

Powered by WWW.EYYBA.COM X3.4© 2001-2023 Inc.   版权所有   

觅风论坛  疆ICP备15020893号-1