国开《数据库基础与应用》第十一章 11-4-6:例11-6

搜答案方法:电脑端按「Ctrl+F」、手机端用「页面查找」功能输入关键词查找。

11-4-6:例11-6

在公司信息管理数据库中增加一个“用户”表,表中存放使用系统的用户名和密码等信息,其表结构如图11-19所示。并在表中输入几条记录以备测试使用。

国开《数据库基础与应用》第十一章 11-4-6:例11-6

图11-19 “用户”表结构

现要求在图11-20所示的登录窗体中检测用户输入的用户名或密码是否是表中已经存在的用户名和密码,根据正确与否给出相应的提示信息。

国开《数据库基础与应用》第十一章 11-4-6:例11-6

图11-20 登录窗体的设计视图

具体操作步骤如下:

1.打开图11-20所示的登录窗体,在该窗体中,两个文本框名称分别为“username”和“password”,“确定”命令按钮的名称为“cmd_ok”,当用户在两个文本框输入了用户名和密码信息后,单击“确定”命令按钮,开始执行此命令按钮的单击事件代码。

2.事件代码首先要连接当前数据库,然后构造一条查询语句,在“用户”表中查看是否有给定的用户名和密码,执行查询语句返回记录集结果。如果没有找到记录,则记录集为空,表示用户名和密码不正确。否则表示找到了指定用户名和密码的记录,则记录集非空。

3.“确定”命令按钮的单击事件代码如下所示:

Private Sub cmd_ok_Click()

 Dim conn As ADODB.Connection '定义连接对象conn

 Dim rs As New ADODB.Recordset '定义记录集对象rs

 Dim strSQL As String 'strSQL是查询语句对应的字符串变量

 Set conn = CurrentProject.Connection 'conn对象连接到当前数据库

 strSQL = "select * from 用户 where 用户名='" '本行和下一行构造查询字符串strSQL

 strSQL = strSQL & username & " ' and 密码='" & password & "'"

 rs.Open strSQL, conn '执行查询返回记录集到rs中

 If rs.EOF Then '判断并给出提示信息

   MsgBox "抱歉,用户名或密码错误!"

 Else

   MsgBox "恭喜您!用户名和密码正确。"

 End If

End Sub

在代码中,定义了连接对象conn连接到当前数据库,定义了记录集对象rs,用于查询用户表中是否有指定的记录。运行结果如上一节图11-17和11-18所示。


「国开学习吧」:用户COOKIE有效时间30天,收藏网址『guokaixuexi.com』不迷路哦~

相关文章

国开《数据库基础与应用》第八章 8-3-1:例8-1

国开《数据库基础与应用》第八章 8-3-1:例8-1

8-3-1:例8-1在“公司信息管理”数据库中查找薪水在5000元及以上的雇员姓名、性别、雇佣日期和薪水信息。具体操作步骤如下:1.在Access 2010中打开“公司信息管理”数据库;2.单击“创建...

国开《数据库基础与应用》第五章 5-2-4:机器实现

国开《数据库基础与应用》第五章 5-2-4:机器实现

5-2-4:机器实现首先把逻辑阶段设计的结果,即数据库的逻辑模式,它包括基本表和视图的定义,在具体的计算机系统中建立起来,然后按照需求分析对数据库的各种数据处理要求,给出相应的实现方法。仍然结合旅店管...

国开《数据库基础与应用》第九章 9-4-7:例9-7

国开《数据库基础与应用》第九章 9-4-7:例9-7

在例9-6中建立的窗体中添加一个“打开新窗体”的命令按钮。具体操作步骤如下:1.在Access 2010中打开“公司信息管理”数据库。2.打开“选项卡实例窗体”,并接着转换为设计视图状态。3.在“设计...

国开《数据库基础与应用》第二章 2-4-1:选择运算

国开《数据库基础与应用》第二章 2-4-1:选择运算

2-4-1:选择运算选择运算是一种单目运算,运算对象是一个关系,它是从一个关系R中选择出满足给定属性条件的所有元组,作为结果关系中的值。选择运算是横向划分关系的运算。对关系R按F(t)条件做选择运算记...

国开《数据库基础与应用》第五章 5-1-5:运行维护阶段

国开《数据库基础与应用》第五章 5-1-5:运行维护阶段

5-1-5:运行维护阶段此阶段主要依靠数据库管理员,即DBA做日常的数据库系统管理和维护工作,他需要利用专门的系统测试和分析工具对系统运行状态进行检测,以便更好地管理和维护系统的正常运行。...

国开《数据库基础与应用》第二章 2-2-1:数据库系统简介

国开《数据库基础与应用》第二章 2-2-1:数据库系统简介

2-2-1:数据库系统简介在一个关系中,每个元组表示现实世界中的一个可描述的实体,而每个实体又包含有许多属性,其中至少存在着一种或一组属性,作为其主码。该主码值绝对不能取空值。空值是一种不确定的值,表...

国开《数据库基础与应用》第四章 4-6-7:EXISTS格式

国开《数据库基础与应用》第四章 4-6-7:EXISTS格式

4-6-7:EXISTS格式使用EXISTS格式的专门比较式。使用关键字EXISTS的专门比较式的语法格式如下:[NOT] EXISTS ( <子查询> )例10:从教学库中查询出没有选修...

国开《数据库基础与应用》第五章 本章小结

国开《数据库基础与应用》第五章 本章小结

本章小结1.数据库应用系统设计是一项非常艰巨的任务,它需要很强的数据库理论知识,相关应用领域的专业知识,数据库管理系统和开发工具的运用,以及个人和团队的经验和能力等。对于初学者来说,要有耐心,要脚踏实...

发表评论    

◎欢迎参与讨论,请在这里发表您的看法、交流您的观点。