e语言是一个自主开发,适合国情,不同层次不同专业的人员易学易用的汉语编程语言。易语言降低了广大电脑用户编程的门槛,尤其是根本不懂英文或者英文了解很少的用户,可以通过使用本语言极其快速地进入Windows程序编写的大门。易语言汉语编程环境是一个支持基于汉语字、词编程的、全可视化的、跨主流 *** 作系统平台的编程工具环境;拥有简、繁汉语以及英语、日语等多语种版本;能与常用的编程语言互相调用;具有充分利用API,COM、DLL、OCX组件,各种主流数据库,各种实用程序等多种资源的接口和支撑工具。易语言有自主开发的高质量编译器,中文源代码被直接编译为CPU指令,运行效率高,安全可信性高;拥有自己的数据库系统,且支持访问现有所有数据库;内置专用输入法,支持中文语句快速录入,完全解决了中文输入慢的问题;易语言除了支持界面设计的可视化,还支持程序流程的即时可视化;除了语句的中文化之外,易语言中还专门提供了适合中国国情的命令,如中文格式日期和时间处理、汉字发音处理、全半角字符处理、人民币金额的处理等;易语言综合采用了结构化、面向对象、组件、构架、集成化等多种先进技术,并在运行效率、性能价格比、全可视化支持、适应本地化需要、面向对象以及提供Windows,Linux上的运行平台等具有特色;现有各种支持库多达40多个,用户可以使用她来满足几乎所有的Windows编程需求,多媒体功能支持强大,完善的网络、端口通讯和互联网功能支持,网上与论坛上的学习资源众多。在易语言及其编译器的设计与实现、可视化汉语编程的构建、提供多种语言版本等方面具有创新。目前易语言已取得国家级鉴定,鉴定会专家一致认为:易语言在技术上居于国内领先地位,达到了当前同类产品的国际先进水平。
调用格式: 〈文本型数组〉 取本机IP () - 网络通讯支持库->网络通讯
英文名称:get_local_ip
取本机IP,返回IP列表数组。本命令为初级命令。
*** 作系统需求: Windows、Linux
代码例子:
版本 2支持库 sock
支持库 spec
局部变量 i, 整数型
a = 取本机IP ()
计次循环首 (取数组成员数 (a), i)
调试输出 (a [i])
计次循环尾 ()
三次握手就搞定了。
先把分上了,给你写个!
刚才写的代码,不是很完善,
版本 2
程序集 窗口程序集1
子程序 __启动窗口_创建完毕
判断开始 (文件是否存在 (取运行目录 () + “\dataedb”) = 假)
写到文件 (取运行目录 () + “\dataedb”, #初始数据库)
默认
判断结束
打开 (取运行目录 () + “\dataedb”, , , , , , )
子程序 _按钮1_被单击
判断开始 (客户1连接 (“127001”, 19730) = 真)
判断开始 (用户编辑框内容 ≠ “”)
判断开始 (密码编辑框内容 ≠ “”)
客户1发送数据 (“登陆|&|!!” + 用户编辑框内容 + “|&|!!” + 密码编辑框内容)
默认
判断结束
默认
判断结束
默认
判断结束
子程序 _服务器1_数据到达
局部变量 返回文本, 文本型
局部变量 *** 作代码, 文本型
返回文本 = 到文本 (服务器1取回数据 ())
*** 作代码 = 取文本左边 (返回文本, 9)
判断开始 ( *** 作代码 = “登陆|&|!!”) ' 从这里开始判断, *** 作是登陆还是注册。这里判断为登陆!
信息框 (返回文本, 0, )
登陆 (返回文本)
默认
判断结束
判断开始 ( *** 作代码 = “注册|&|!!”) ' 这里是注册 *** 作的判断条件
注册 (返回文本)
默认
判断结束
子程序 注册
参数 数据包, 文本型
局部变量 数组变量, 文本型, , "0"
局部变量 注册用户名, 文本型
局部变量 注册密码, 文本型
局部变量 注册邮箱, 文本型
局部变量 循环数, 整数型
局部变量 可以注册, 逻辑型
局部变量 用户名, 文本型
局部变量 密码, 文本型
局部变量 邮箱, 文本型
可以注册 = 假
循环数 = 取记录数 ()
数组变量 = 分割文本 (数据包, “|&|!!”, )
注册用户名 = 数组变量 [2]
注册密码 = 数组变量 [3]
注册邮箱 = 数组变量 [4]
到首记录 ()
计次循环首 (循环数, )
用户名 = 读 (“用户”)
密码 = 读 (“密码”)
邮箱 = 读 (“邮箱”)
判断开始 (用户名 + 密码 + 邮箱 ≠ 注册用户名 + 注册密码 + 注册邮箱)
可以注册 = 真
跳出循环 ()
默认
跳过 ()
判断结束
计次循环尾 ()
判断开始 (可以注册 = 真)
加空记录 ()
写 (“用户”, 注册用户名)
写 (“密码”, 注册密码)
写 (“邮箱”, 注册邮箱)
服务器1发送数据 (服务器1取回客户 (), “注册成功!”, )
默认
判断结束
判断开始 (可以注册 = 假)
服务器1发送数据 (服务器1取回客户 (), “有了!”, )
默认
判断结束
子程序 登陆, , , 验证登陆
参数 待处理数据, 文本型
局部变量 登陆用户, 文本型
局部变量 用户密码, 文本型
局部变量 数组, 文本型, , "0"
局部变量 循环, 整数型
局部变量 数据库_用户, 文本型
局部变量 数据库_密码, 文本型
局部变量 记录数, 整数型
局部变量 以读取数, 整数型
局部变量 验证标签, 逻辑型
局部变量 验证邮箱, 文本型
局部变量 数据库_邮箱, 文本型
记录数 = 取记录数 ()
验证标签 = 假
数组 = 分割文本 (待处理数据, “|&|!!”, )
登陆用户 = 数组 [2]
用户密码 = 数组 [3]
到首记录 ()
计次循环首 (记录数, 以读取数)
数据库_用户 = 读 (“用户”)
数据库_密码 = 读 (“密码”)
数据库_邮箱 = 读 (“邮箱”)
判断开始 (数据库_用户 + 数据库_密码 = 登陆用户 + 用户密码)
验证标签 = 真
跳出循环 ()
默认
跳过 ()
判断结束
计次循环尾 ()
判断开始 (验证标签 = 真)
服务器1发送数据 (服务器1取回客户 (), “登陆成功!”, )
默认
服务器1发送数据 (服务器1取回客户 (), “登陆失败!”, )
判断结束
子程序 _客户1_数据到达, , , 反馈登陆信息
判断开始 (到文本 (客户1取回数据 ()) = “登陆成功!”)
信息框 (“来自服务器的消息:登陆成功!”, 0, )
默认
判断结束
判断开始 (到文本 (客户1取回数据 ()) = “登陆失败!”)
信息框 (“来自服务器的消息:登陆失败!”, 0, )
默认
判断结束
' ==============================================以上为登陆 *** 作,下面是注册的=======================
判断开始 (到文本 (客户1取回数据 ()) = “有了!”)
信息框 (“来自服务器的消息:欲注册的用户已经存在!”, 0, )
默认
判断结束
判断开始 (到文本 (客户1取回数据 ()) = “注册成功!”)
信息框 (“来自服务器的消息:注册成功!”, 0, )
默认
判断结束
子程序 _按钮2_被单击, , , 客户1进行数据 *** 作
局部变量 注册数据包, 文本型, , , 这是发送注册信息的完整的变量
局部变量 分割标签, 文本型, , , 将几个数据属性(用户、密码、邮箱)分开以保证服务器区别的特殊文本
局部变量 用户, 文本型
局部变量 密码, 文本型
局部变量 邮箱, 文本型
分割标签 = “|&|!!”
判断开始 (编辑框3内容 ≠ “”)
用户 = 编辑框3内容
判断开始 (编辑框4内容 ≠ “”)
判断开始 (编辑框5内容 ≠ “”)
判断开始 (编辑框6内容 ≠ “”)
邮箱 = 编辑框6内容
判断开始 (编辑框4内容 = 编辑框5内容)
密码 = 编辑框4内容
默认
判断结束
默认
判断结束
默认
判断结束
默认
判断结束
默认
判断结束
注册数据包 = “注册|&|!!” + 用户 + 分割标签 + 密码 + 分割标签 + 邮箱
客户1连接 (“127001”, 19730)
客户1发送数据 (注册数据包)
下载地址
http://mailqqcom/cgi-bin/ftnExs_downloadk=5c36643910fbcecdc2d585291036031d54575d585403520249070708571b05055352495b5702501f075554010557060701035c5a363531034a536404&t=exs_ftn_download&code=d6d96612
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)