易语言，两个编辑框，一个是帐号，另一个是密码，在有一个按钮。还有一个edb数据库文件，里面有帐号和

.版本 2
.支持库 eDB

.子程序 _按钮_登录_被单击

.判断开始 (编辑框1.内容 ＝ “”)
    信息框 (“用户名不能为空”, 0, )
    返回 ()
.判断 (编辑框2.内容 ＝ “”)
    信息框 (“密码不能为空”, 0, )
    返回 ()
.默认

.判断结束
记录集1.打开 (“Select * from 账号 where 密码='” ＋ 编辑框2.内容 ＋ “' and 用户名='” ＋ 编辑框1.内容 ＋ “'”, #SQL语句)
.如果真 (记录集1.记录数量 ＞ 0)
    信息框 (“登录成功”, 0, )
    返回 ()
.如果真结束
信息框 (“登录失败！”, 0, )

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

数据库连接1.连接Access (取运行目录 () ＋ “\密码账号.mdb”, “”)
记录集1.置连接 (数据库连接1)

先用Access 建一个数据库文件 名字叫“密码账号” 然后建表 添加两个字段 "用户名" "密码"

表名“账号” 然后保存到易语言源码的文件夹里

在界面上放上数据库连接组件和记录集组件 然后写SQL语句查找 如果有这样的项目 就显示登录成功

大神，，我看不懂哇，，我弄的是数据库是edb的啊。。。

.版本 2

.子程序 _按钮2_被单击

到首记录 ()
.计次循环首 (取记录数 (), )
    .如果真 (读 (“密码”) ＝ 编辑框2.内容 且 读 (“用户名”) ＝ 编辑框1.内容)
        信息框 (“登录成功”, 0, )
        返回 ()
    .如果真结束
    跳过 ()
.计次循环尾 ()
信息框 (“登录失败！”, 0, )

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

打开 (“账号.edb”, , , , , , )

.子程序 __启动窗口_将被销毁

关闭 ()

用易语言建一个数据库 添加两个文本字段 密码 和 用户名 保存到当前易语言源码的文件名

然后添加几个数据值 就可以测试了 

大侠，能不能把源码上传给我？？？还有你做的那个edb的文件。。我看看

写好了