Office中国论坛/Access中国论坛

标题: 修改密码按钮如何做？ [打印本页]

作者: 谢健 时间: 2007-5-10 22:08
标题: 修改密码按钮如何做？
修改密码后，点确定后更改“用户”表中的密码，请问这个按钮如何做？[attach]24331[/attach]

作者: 一点通 时间: 2007-5-10 23:20
先判断旧密码是否正确,然后判断二个新密码是否相同,最后用ADO将新密码保存到表中,

论坛上有近似例子,请用"登陆"关键字搜索一下旧贴

作者: 谢健 时间: 2007-5-11 00:09
一点通大师，你说的那二点我已经做好了，一是判断旧密码是否正确，二是判断二个新密码是否相同。这二个我已经写好了。只差那个修改密码的语句了，我写的代码如下：If Nz([原密码]) = "" Or Nz([新密码]) = "" Or Nz([确认新密码]) = "" Then
  MsgBox "原密码、新密码及确认密码不能为空，请重新输入！", 64, "信息提示"

ElseIf Me![原密码] <> DLookup("密码", "用户", "代码 = '" & Me![用户代码] & "'") Then
  MsgBox "原密码不正确，请重新输入！", 64, "信息提示"

ElseIf Me![新密码] <> Me![确认新密码] Then
  MsgBox "两次输入的新密码不相同，请重新输入！", 64, "信息提示"

Else
MsgBox "保存成功！", 64, "信息提示"

作者: 一点通 时间: 2007-5-11 00:57
DoCmd.RunSQL "UPDATE 用户 SET [用户].[密码]= " & [新密码] & " WHERE [用户].[代码]='" & [用户代码] & "'"
MsgBox "保存成功！", 64, "信息提示"

作者: 谢健 时间: 2007-5-11 17:12
谢谢一点通大师，成功了！非常感谢！

作者: jpj123123 时间: 2008-2-15 21:26
虚心学习了!!!!!!!!

作者: jackysu78 时间: 2009-3-17 16:45
我也要感谢一点通大师和楼主提的这个问题，刚好解决我现在的问题，搞了这么久发现自己的Update写错了。

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)