您的位置首页快问快答

做access数据库的时候,怎么通过验证用户名和密码登陆到主窗体

做access数据库的时候,怎么通过验证用户名和密码登陆到主窗体

的有关信息介绍如下:

做access数据库的时候,怎么通过验证用户名和密码登陆到主窗体

下面是我做的方法

先创建一个用户表,里面有用户名葛密码,,,然后弄两个文本框,一个名为name,一个为名为password 在登录按钮用VBA代码,代码如下:

If IsNull(Me![name]) Then

MsgBox "请选择用登录用户!", 64, "系统提示"

Me![name].SetFocus

Else

If IsNull(Me![password]) Then

MsgBox "请输入密码,密码不能为空!", 64, "系统提示"

Me![password].SetFocus

Else

Dim stemp As String

Dim rs As ADODB.Recordset

Set rs = New ADODB.Recordset

stemp = "select * from 用户表 where 用户名='" & Me![name] & "'"

rs.Open stemp, CurrentProject.Connection, adOpenKeyset, adLockOptimistic

If rs("密码") <> Me![password] Then

MsgBox "密码错误,请重新输入!", vbOKOnly, "系统提示"

Me![password] = ""

Me![password].SetFocus

Else

DoCmd.Close

DoCmd.OpenForm "主菜单"

End If

End If

End If

不需要用VBA。用窗体和宏来做。

用设计视图新建一个窗体,在用工具箱里的按钮(组合框)如图

再来就编写宏,库员1和aaa是用户名和密码。这里你可以编写,然后在下方的操作参数那里要记得设计打开的窗体是什么和消息,就可以了。 那个窗体的确定按钮可以进入属性来设置,

1. 用系统内置的Administrator系统超级用户登录。在默认情况下,Administrator账号的密码是空的。因此,我们可在“带命令行的安全模式”下,以系统超级用户Administrator的身份进入系统,然后用“Net User”命令强制更改用户密码或新建用户账号。也可在出现经典登录界面要求输入用户名和密码时,输入Administrator账号,再用空密码进入系统(在Windows XP中如不出现经典登录界面,可按住Ctrl+Alt后连按两下Del键即可)。用这种方法登录系统后,我们就可以删除或新建用户账号了。然而,这种方法只能对付系统本来就没有给默认的Administrator账号设置密码的情况。要是原系统中已经给它设置了密码,则根本无法用这种方法登录系统,更不要说用“Net user”了。

2. 删除系统文件夹System32\Config下的SAM文件。这种方法只在Windows 2000中有效,要是用来对付Windows XP和Windows 2003,则会在启动系统时出现“安全账户初始化失败”的提示,使整个系统无法使用。

3. 在DOS状态下,将系统文件夹System32下的logon.scr改成其他名称,再将cmd.exe改成logon.scr后重新启动系统。等上10 分钟后,系统会将改了名的cmd.exe文件当作屏幕保护程序自动运行,这样便进入DOS界面。这时,我们就可用net user命令给系统添加用户或更改密码了。但实际上,在Windows XP SP1(SP2)和Windows 2003中,用这种方法进入后,不再像前几个版本一样具有系统超级用户Administrator权限。当用Net user添加用户时,系统会提示“发生系统错误。拒绝访问”,让你根本无法添加用户。

4. 用WindowsKey、DreamPackPL等软件更改系统登录密码。但这些软件不是找不到有效的注册码,就是界面不够友善,操作步骤也太复杂。对于一般用户而言,面对一串串英文往往会不知所措。

那么,有没有更好的方法来轻松修改系统登录密码呢?答案是肯定的。ERD Commander 2003就是一款可以轻松修改系统管理员密码的傻瓜化软件,而且这款软件对Windows 2000/XP/2003各种版本的系统均有效

设置启动界面