‘壹’ 怎么用易语言做一个登入和注册系统界面如下图的。没钱啊!
服务端
.版本 2
.支持库 mysql
.程序集 窗口程序集1
.子程序 _服务器1_数据到达
.局部变量 客户, 文本型
.局部变量 数据, 字节集
.局部变量 数据到文本, 文本型
.局部变量 数据分割, 文本型, , "0"
.局部变量 临时记录集, 整数型
.局部变量 密码, 文本型
客户 = 服务器1.取回客户 ()
数据 = 服务器1.取回数据 ()
数据到文本 = 到文本 (数据)
数据分割 = 分割文本 (数据到文本, “|”, )
.判断开始 (数据分割 [1] = “登录”)
执行SQL语句 (mysql, “SELECT * FROM `account_tbl` where account='” + 数据分割 [2] + “';”)
临时记录集 = 取记录集 (mysql)
读字段值 (临时记录集, “password”, 密码)
.判断开始 (字段是否为空 (临时记录集, “account”) = 假)
服务器1.发送数据 (客户, “帐号错误”, )
.判断 (密码 ≠ 数据分割 [3])
服务器1.发送数据 (客户, “密码错误”, )
.默认
服务器1.发送数据 (客户, “登录成功”, )
.判断结束
.判断 (数据分割 [1] = “注册”)
执行SQL语句 (mysql, “SELECT * FROM `account_tbl` where account='” + 数据分割 [2] + “';”)
临时记录集 = 取记录集 (mysql)
.判断开始 (字段是否为空 (临时记录集, “account”) = 假)
执行SQL语句 (mysql, “insert into `account_tbl` VALUES ('” + 数据分割 [2] + “','” + 数据分割 [3] + “');”)
服务器1.发送数据 (客户, “注册成功”, )
.默认
服务器1.发送数据 (客户, “帐号已存在”, )
.判断结束
.默认
.判断结束
.子程序 __启动窗口_创建完毕
mysql = 连接MySql (“127.0.0.1”, “test”, “test”, “account”, 3306)
客户端
.版本 2
.程序集 窗口程序集1
.子程序 _按钮1_被单击
.如果真 (编辑框2.内容 = “” 或 编辑框1.内容 = “”)
信息框 (“请填写完成所有信息”, 0, )
返回 ()
.如果真结束
客户1.发送数据 (“登录” + “|” + 编辑框1.内容 + “|” + 编辑框2.内容)
.子程序 __启动窗口_创建完毕
.局部变量 服务器, 文本型
.局部变量 端口, 整数型
服务器 = “127.0.0.1”
端口 = 5678
.如果真 (客户1.连接 (服务器, 端口) = 假)
信息框 (“对不起连接服务器失败”, 0, )
结束 ()
.如果真结束
.子程序 _客户1_数据到达
.局部变量 数据, 字节集
.局部变量 数据到文本, 文本型
数据 = 客户1.取回数据 ()
数据到文本 = 到文本 (数据)
.判断开始 (数据到文本 = “登录成功”)
信息框 (数据到文本, 0, )
.判断 (数据到文本 = “注册成功”)
信息框 (数据到文本, 0, )
.默认
信息框 (数据到文本, 0, )
.判断结束
.子程序 _注册_被单击
载入 (窗口1, , 真)
多给点分!
‘贰’ 易语言如何连接服务器
.版本 2
.支持库 mysql
.子程序 _按钮1_被单击
.局部变量 b, 整数型
.局部变量 取查询值, 整数型
.局部变量 MySQL语句, 文本型
.局部变量 记录数量, 整数型
.局部变量 i, 整数型
.局部变量 姓名, 文本型
b = 连接MySql (“120.26.*.*”, “root”, “123445”, “user”, 3306)
输出调试文本 (b)
MySQL语句 = “select * from user_table”
执行SQL语句 (b, MySQL语句)
取查询值 = 取记录集 (b)
记录数量 = 取记录集行数 (取查询值)
输出调试文本 (记录数量)
.计次循环首 (记录数量, i)
读字段值 (取查询值, “username”, 姓名)
.如果 (姓名 = “admin”)
信息框 (“已找到”, 0, , )
跳出循环 ()
.否则
.如果结束
' //输出调试文本 (姓名)
到下一行 (取查询值)
.计次循环尾 ()
-来源于网络
‘叁’ 易语言客户1.连接(IP,服务器端口),还有服务器怎么填()设置了路由器映射的
虚拟服务器定义了广域网服务端口和局域网网络服务器之间的映射关系,所有对该广域网服务端口的访问将会被重定位给通过IP地址指定的局域网网络服务器。
这段话的意思是 所有访问你外网IP指定端口的连接都转到你的电脑上 [指定端口=服务端口号]
通俗点 比如 你客户1连接的IP端口是1
那么在服务端口号填1 IP地址就填你本地连接的IP地址(不可以自动获取IP地址,要给它一个固定的)
协议选择ALL
最后那个常用不用选 别管他
如果你是写远程的话 写好后请发一份到我邮箱 要源码
[email protected]
‘肆’ 易语言程序怎么填写连接发信服务器地址
第一个参数 发信邮件服务器地址 是smtp 一般有qq.smtp.com 163.smtp.com
第二个参数 端口 默认是25.