access数据库为什么一直登陆_Access数据库创建用户登录
时 间:2012-08-13 10:12:28
作 者:摘 要:好的东东与大家一起分享!也感谢“麥田”老师给予指导才使得大家能见到图片。
正 文:
VB用Access数据库创建用户登录问题是VB学习的一个基本要求,下面介绍一下基本的设计思路和代码。
步骤/方法
一、使用Access数据库创建用户登录,首先必须设置数据库,为了使大家容易理解,这里仅仅设置用户登录表:(数据库是A.Mdb,登录表是:A1)
表1、A1数据表结构
表2、A1数据表数据
二、数据库连接:
在程序中要连接数据库,才能使用数据表,所以必须连接数据库,数据库连接比较简单,关键是程序中必须添加引用,添加方法是点击【工程】-【引用】在对话框选择“Microsoft DAO 3.6 Object Library”和“Microsoft ActiveX Data Objects 2.6 Library”,将它们勾选,然后点击【确定】,这样就添加了数据库的引用了。
接下来在程序中添加一个模块(注意,不是类模块),模块名称为 Module1在模块中编写下面的代码:
Public db As New ADODB.Connection'声明数据库连接对象
Public RS As New ADODB.Recordset '声明将来就对象
Public Sub SJK(db) '连接数据库过程
db.ConnectionString = "DRIVER=Microsoft Access Driver (*.mdb);dbQ=" & App.Path & "\A.mdb"
db.Open
End Sub
由于是在模块中声明和创建过程的,因此这些声明的变量和过程是程序共享的,也就是在程序的所有界面均可以调用变量和 SJK过程。
三、用户登录界面的设计:添加一个窗体,修改窗体的名称为“登录”,修改窗体的Caption属性为“用户登录”,修改Width属性为8550,修改Height属性为5130,修改StartUpPosition属性为2-屏幕中心,修改MaxButton属性为Fales,最后将图片添加到Picture属性中,好了窗体属性基本设置完成,下面在窗体添加一下需要的控件。在左边的《工具栏》选择添加二个TextBox控件,分别是Text1和Text2,添加二个CommandButton控件,分别是Command1和Command2,添加4个Label控件,分别是Label1(0)、Label1(1)、Label1(2)、Label1(3),设计好后的界面如下:
至于控件的有关属性,请自行设置。
四、窗体代码窗口的有关代码清单
Dim strSQL As String '定义一个字符串变量
Private Sub Command1_Click()
If Text1.Text = "" Then
MsgBox "用户名不能为空!!请输入用户名!", 16, "错误!"
Exit Sub
End If
If Text2.Text = "" Then
MsgBox "用户密码不能为空!!请输入用户密码!", 16, "错误!"
Exit Sub
End If
Call SJK(db) '调用数据库连接
strSQL = "Select * form A1 where MC='" & Text1.Text & "'" '数据表连接字符串
RS.Open strSQL, db, 2, 2 '打开数据表
If RS.EOF = True Then '用户名错误
MsgBox "没有这个用户!!请检查后重新输入!", 16, "错误!"
RS.Close
Set RS = Nothing
db.Close
Set db = Nothing
Exit Sub
Else
If Not RS!MM = Text2.Text Then '用户密码错误
MsgBox "用户密码错误!!请检查后重新输入!", 16, "错误!"
RS.Close
Set RS = Nothing
db.Close
Set db = Nothing
Exit Sub
Else '登录成功
'如果有必要,在这里可以添加系统共有变量存储登录人的一些信息
Unload Me'关闭登录窗口
某某系统主页面.Show '转到用户进入的界面
End If
End If
RS.Close
Set RS = Nothing
db.Close
Set db = Nothing
End Sub
Private Sub Command2_Click()
End '退出系统
End Sub
Private Sub Form_Load()
For I = 0 To 3
Label1(I).BackStyle = 0 '使标签透明
Next I
End Sub
是不是很简单!!
经验内容仅供参考,如果您需要解决具体问题(尤其在ACCESS领域),建议您接下来详细咨询相关领域专业人士。
Access软件网QQ交流群(群号:39785885)
Access源码网店
access数据库为什么一直登陆_Access数据库创建用户登录相关推荐
- oracle 11g 数据库cmd修改用户名密码及创建用户
oracle 11g 数据库cmd修改用户名密码及创建用户 1. 数据库oracle 11g cmd命令修改用户名和密码 1.1. 前言 1.2. cmd窗口登录oracle 1.3. 更改syste ...
- sau交流学习社区第三方登陆github--oauth来实现用户登录
sau交流学习社区第三方登陆github--oauth来实现用户登录 最近在丰富nodejsBlog开发的"交流学习社区"(https://www.mwcxs.top)的其他功能以 ...
- JAVA——创建用户登录界面
创建用户登录界面 1.新建超市管理系统 File-new-project-java-java project,创建项目名:SupermarketClient. 2.在Supermarket下面创建两个 ...
- access数据库拆分的用途_ACCESS数据库的用途和优缺点
ACCESS简介 Access 是微软公司推出的基于Windows的桌面关系数据库管理系统(RDBMS,即Relational Database Management System),是Office系 ...
- access如何保存小数点后_Access数据库破解实战
Access数据库基本知识 Access是微软(Microsoft)公司于1994年推出的一种基于Windows的桌面关系数据库管理系统(RDBMS),关系式数据库由一系列表组成,表又由一系列行和列组 ...
- oracle数据库赋权_Oracle角色权限创建用户赋权
1.权限&用户 角色权限: Sysdba:可以改变字符集.创建删除数据库.登录之后用户是SYS(可以启动和关闭数据库) Sysoper:不可改变字符集.不能创.删数据库.登陆之后用户是PUBL ...
- 编程学习记录11:Oracle数据库的一些基本操作1,创建用户,授权
登录指令: 初始管理员登录,在命令窗口输入sqlplus / as sysdba 进行登录, 普通用户登录 在命令窗口输入sqlplus 后会出现输入账号密码,输入密码时不会显示. 修改用户指令: 创 ...
- 【ASP.NET Web】项目实践—网上宠物店5:创建用户登录/注销页面、完善母版页
基于数据库的 Web 应用程序都需要考虑网站的安全性,网站离不开权限管理,包括用户身份识别和用户授权两部分.识别用户身份通过登录来实现.用户授权是根据不同的用户身份判断是否允许其访问某个网页或执行某些 ...
- linux怎么创建用户登录,如何创建一个不能登录的Linux用户名
作为一个Linux系统管理员,出于安全原因,有时候可能需要创建一个无法登录的用户.什么时候需要这种类型的用户?例如,您必须为应用程序创建一个用户才能正常运行,但是您不希望该用户具有主目录或登录权限. ...
- access数据库应用系统客观题_Access数据库选择题练习与答案
1 2 .在数据库设计中,将 E-R 图转换成关系数据库模型的过程属于 ( A )需求分析阶段 ( B )概念设计阶段 ( C )逻辑设计阶段 ( D )物理设计阶段 答案( C )参见课本第 26 ...
最新文章
- 【Java线程】进程与线程
- pytorch:一维线性回归(一)
- 【期外】 (一)关于LSH :局部敏感哈希算法
- 实现机器学习的循序渐进指南系列汇总
- ASP.NET状态管理详解,让你明明白白
- PAT (Basic Level) Practice1011 A+B 和 C
- 手把手教你在Windows中配置Gradle环境
- linux打jar包命令行,windows下命令行打jar包方法
- 基于IC设计的实用ISP算法介绍
- 科大讯飞与IBM组队人工智能蓝蓝CP
- Python selenium —— selenium与自动化测试成神之路
- BD NetDisk不限速下载,某度网盘不限速下载,跑满带宽,网盘下载器,网盘高速下载器,不限速网盘下载,AntNetDiskDownloader
- AMD CPU 历史表
- npm run build 打包报错primordials is not defined的解决方法
- gin-gonic/gin使用详解
- 2022年武汉市工业产品绿色设计示范企业申报条件流程
- ERP打印入库单(四十)
- iOS播放音乐与播放系统声音
- python真的如此好吗?
- 什么叫封装?封装有什么作用?
热门文章
- 录音文件下载_如何免费下载受版权保护的收费音乐
- Java学习之Xpath报错 Exception in thread “main“ java.lang.NoClassDefFoundError: org/jaxen/Namespa
- java类加载器有几种_请问这几种类加载器有什么区别?
- 虚拟机访问服务器文件夹,浅析CentOS8虚拟机访问Windows10主机文件夹方法
- 计算机excel函数试题,2014职称计算机考试Excel试题函数练习题
- web开发规范 - html书写规范
- IBM人工智能项目Watson旧金山开设新总部
- TCP|IP+WIFI无线远程网络RFID|NFC读卡器HX530-Q-A系列Server网络模式与 Client网络模式设置说明
- android 疯狂猜成语 源码,安卓版疯狂猜成语答案图文全解
- 信号与系统学习总结 第三章 傅里叶变换