为编程爱好者分享易语言教程源码的资源网
三叶资源网易语言免费公开课
三叶资源网官方③群:33301895 三叶资源网解压密码 C全站文字广告,诚邀与您合作 三叶资源网培训教程视频 三叶资源网官方③群:33301895
三叶资源网官方③群:33301895 三叶资源网访问导航 B全站文字广告,诚邀与您合作 三叶资源网培训教程视频 三叶资源网官方③群:33301895

网站首页 易语言相关 网络相关源码 正文

易语言Winsock实现网络聊天室源码

三叶资源网 2013-05-17 网络相关源码 271 ℃ 1 评论

程序结合易语言扩展界面支持库和网络通讯支持库,实现网络聊天室功能。

@易语言论坛

.版本 2
.支持库 spec

.子程序 OnClientMessage
.参数 wparam, 整数型
.参数 lparam, 整数型
.局部变量 len, 整数型
.局部变量 s, 字节集

.判断开始 (lparam = #FD_CONNECT)
    len = GetLastError ()
    .判断开始 (len ≠ 0)
        信息框 (“Error in Connecting”, 0, )
    .默认
        m_bInit = 真
        m_bClient = 真
        m_sShowText.加入文本 (“Having connected to server” + #换行符)
        ' 三叶资源网(www.sanye.cx)
    .判断结束
    返回 ()
.判断 (lparam = #FD_READ)
    s = 取空白字节集 (1024)
    len = recv (m_hSocket, 取变量数据地址 (s), 1024, 0)
    m_sShowText.加入文本 (到文本 (s) + #换行符)
    返回 ()
.判断 (lparam = #FD_WRITE)
    返回 ()
.判断 (lparam = #FD_CLOSE)
    返回 ()


文件下载

Tags:

来源:三叶资源网,欢迎分享,公众号:iisanye,(三叶资源网官方③群:33301895

已有1位网友发表了看法:

欢迎 发表评论:

百度站内搜索
交流QQ群:33301895
三叶资源网官方③群:33301895
加群全凭信仰,群里有的资源网站也会有。
群里只是能及时交流,群主会尽力解答一些会的问题。
设置付费入群,只是为了过滤一些小号无意义广告。
所以不必要为了1块钱加群又退出
群主在群内发的红包都够你抢回来还有的多,更何况还能交流学习。
网站分类
随机tag
ACCESS操作斗鱼弹幕助手url编解码天猫取QQKEY酷Q机器人4G移动通信技术权威指南BPL综合例程Vstart表白程序鼠标离开悬停百度云防护递归算法动态加密微信群发内存限制未授权U盘枚举文件鱼刺类SubLime Text教程
最新评论