易语言如何写登录器

作者&投稿:学瑞 (若有异议请与网页底部的电邮联系)
易语言登录器命令怎么写?~

直接复制粘贴进易语言代码框即可。
.版本 2.程序集 窗口程序集1.子程序 _按钮1_被单击.如果真 (编辑框1.内容 = “”) 信息框 (“请输入帐号”, 0, ) 返回 ().如果真结束.如果真 (编辑框2.内容 = “”) 信息框 (“请输入密码”, 0, ) 返回 ().如果真结束.如果 (编辑框1.内容!="管理员帐号" 或 编辑框2.内容!="管理员密码")'这里是我加的一个备用,可以去掉 开始 信息框 (“帐号或密码错误。”, #错误图标, ) 返回 ().否则 信息框 (“登录成功!”, 0, ) 返回 () ' 这里是我加的一个备用,可以去掉 结束.如果结束信息框 (“登录成功”, 0, )

利用服务器控件和客户控件可以做出一个局域网的登录、控制系统源码如下: .版本 2
.支持库 sock.程序集 窗口程序集1
.程序集变量 用户, 文本型
.程序集变量 密码, 文本型.子程序 __启动窗口_创建完毕
.局部变量 IP, 文本型, , "0"IP = 取本机IP ()
编辑框1.内容 = IP [1].子程序 _服务器_数据到达
.局部变量 数据, 文本型数据 = 删首尾空 (到文本 (服务器.取回数据 ()))
用户 = 取文本左边 (数据, 寻找文本 (数据, “#”, , 真) - 1)
密码 = 取文本右边 (数据, 取文本长度 (数据) - 寻找文本 (数据, “#”, , 真))
信息框 (“有用户登录:” + #换行符 + 用户 + #换行符 + 密码, 0, )
.子程序 _按钮1_被单击客户.连接 (编辑框1.内容, 19730)
客户.发送数据 (到字节集 (编辑框2.内容 + “#” + 编辑框3.内容))
.子程序 _服务器_客户进入输出调试文本 (服务器.取回客户 ())

给你个简单的登录实例。需要 数据库操作支持库。当然你也可改成读取文本文件的,就不需要数据连接这些了。。

.程序集 启动窗口程序集

.子程序 __启动窗口_创建完毕

数据库路径 = 取运行目录 () + “\date.mdb”

数据库连接1.连接Access (数据库路径, “”)

记录集1.置连接 (数据库连接1)

记录集1.打开 (“select * from Users”, 1)

记录集1.读文本 (“用户名”, UserName)

记录集1.读文本 (“密码”, Pass)

记录集1.读文本 (“姓名”, Name)

UserName.内容 = UserName

登陆.获取焦点 ()

.子程序 _登陆_被单击

.局部变量 字节集, 文本型

.如果 (UserName.内容 ≠ “”)

    记录集1.打开 (“select 用户名 from Users where 用户名 = '” + UserName.内容 + “'”, 1)

    .如果 (记录集1.记录数量 ≠ 0)

        .如果 (Pwd.内容 ≠ “”)

            记录集1.打开 (“select 密码 from Users where 用户名 = '” + UserName.内容 + “'”, 1)

            记录集1.读文本 (“密码”, Pass)

            字节集 = 到文本 (Pwd.内容)

            .如果 (Pass = “888")

                记录集1.关闭 ()

                数据库连接1.关闭 ()

                执行 (4, “c:\a.exe”, , , )

            .否则

                信息框 (“密码不正确!请重新输入。”, 0, )

                Pwd.内容 = “”

                Pwd.获取焦点 ()

            .如果结束

        .否则

            信息框 (“密码不能为空!”, 0, )

            Pwd.获取焦点 ()

        .如果结束

    .否则

        信息框 (“系统无此用户,请核对!”, 0, )

        UserName.获取焦点 ()

    .如果结束

.否则

    信息框 (“用户名不能为空!”, 0, )

    UserName.获取焦点 ()

.如果结束

.子程序 _取消_被单击

记录集1.关闭 ()

数据库连接1.关闭 ()

结束 ()



你的问题回答起来很多内容,可参考易语言的相关教程,电驴有下。

怎么用易语言做个登录器和一个登录服务器
答:信息框 (“有用户登录:” + #换行符 + 用户 + #换行符 + 密码, 0, ).子程序 _按钮1_被单击客户.连接 (编辑框1.内容, 19730)客户.发送数据 (到字节集 (编辑框2.内容 + “#” + 编辑框3.内容)).子程序 _服务器_客户进入输出调试文本 (服务器.取回客户 ())

易语言用服务器,客户端组件做一个注册登录软件 客户端注册后账号密码发...
答:.子程序 _服务器1_客户进入 ' 当某客户连接进来时,将其加入在线列表。列表框1.加入项目 (服务器1.取回客户 (), ).子程序 _服务器1_客户离开 .局部变量 客户, 文本型 .局部变量 项目数 .局部变量 变量1 ' 当某客户断开连接时,将其从在线列表中删除。客户 = 服务器1.取回客户 ()项目数...

怎么用易语言写一个QQ西游登录器,已经做好登录器外观,但不会写代码?大...
答:你可以直接复制以上代码粘贴进去,只要你有易语言基础是很容易可以用这两个子程序做出登录器的,祝你成功!邮件已发送已发送

本人想用易语言编辑个登陆器,登录成功跳转到窗口2,怎么实现???_百度...
答:.子程序 _按钮1_被单击 .如果 (编辑框1.内容 = “账号”).如果 (编辑框2.内容 = “密码”)载入 (窗口2, , 真) ' 这里写成功的信息比如前面的 .否则 信息框 (“密码错误”, 0, ) ' 这里写错误信息 .如果结束 .否则 信息框 (“账号错误”, 0, ) ' 这里也是写错误的信息框 ...

易语言怎么做一个网站登录器?
答:1、打开易语言编辑软件,然后新建一个Windows窗口程序 2、调整窗口大小并画上一些组件,如图。3、将第二个编辑框的输入方式设置为密码输入。4、复制下面代码,然后双击按钮,再粘贴上去。版本 2.如果真 (编辑框1.内容 = “”) 信息框 (“请输入账号!”, 0, ) 返回 ().如果真结束.如果真 (...

易语言如何制作一款简单的登录软件,但是登录软件需要读取本地数据库已有...
答:你说账号密码的数据保存在本地,那还登录什么,有何意义 把账号信息以账号名保存成文件,文件内容为加密后的密码。这样就行了,相当于添加了使用验证限制 作为过来人告诉你本地做登录系统有什么卵用,不会显得很牛13只会显得更low 想做登录就需要服务器做验证 ...

怎么用易语言制作像QQ偷菜器一样的登录器呢
答:首先写个板块,有两个编辑框,第一个是帐号,第二个是密码,第二个输入方式密码输入 编辑框1.QQ账号.内容 = 读配置项 (取运行目录 () + “/zh.DAT”, 账号信息, “你的账号:”, 账号信息)编辑框2.QQ密码.内容 = 读配置项 (取运行目录 () + “/zh.DAT”, 账号信息, “你的...

怎么用易语言写一个可以写入文本的登录器?
答:编辑框1.内容是否等于读配置文件中保存的账号一样,如果一样,跳转验证密码,如果不一样,自动载入注册窗口 将注册窗口中写好的账号密码,写配置文件,保存在当前目录中,然后重新跳转登入窗口 账号密码都一样,关闭本窗口,打开主程序窗口

易语言如何写登录器
答:记录集1.置连接 (数据库连接1)记录集1.打开 (“select * from Users”, 1)记录集1.读文本 (“用户名”, UserName)记录集1.读文本 (“密码”, Pass)记录集1.读文本 (“姓名”, Name)UserName.内容 = UserName 登陆.获取焦点 ().子程序 _登陆_被单击 .局部变量 字节集, 文本型 .如果 ...

我自己用易语言做了个QQ登陆器,有个问题搞不懂,比如说你没如输入QQ号 ...
答:.版本 2 .程序集 窗口程序集1 .子程序 _按钮1_被单击, , , a6652399原创!!' a6652399原创!!.判断开始 (编辑框1.内容 = “”) 信息框 (“请输入账号!”, 0, ).判断 (取文本长度 (编辑框1.内容) < 6) 信息框 (“您的账号有误”, 0, ).默认 ...