Access交流中心

北京 | 上海 | 天津 | 重庆 | 广州 | 深圳 | 珠海 | 汕头 | 佛山 | 中山 | 东莞 | 南京 | 苏州 | 无锡 | 常州 | 南通 | 扬州 | 徐州 | 杭州 | 温州 | 宁波 | 台州 | 福州 | 厦门 | 泉州 | 龙岩 | 合肥 | 芜湖 | 成都 | 遂宁 | 长沙 | 株洲 | 湘潭 | 武汉 | 南昌 | 济南 | 青岛 | 烟台 | 潍坊 | 淄博 | 济宁 | 太原 | 郑州 | 石家庄 | 保定 | 唐山 | 西安 | 大连 | 沈阳 | 长春 | 昆明 | 兰州 | 哈尔滨 | 佳木斯 | 南宁 | 桂林 | 海口 | 贵阳 | 西宁 | 乌鲁木齐 | 包头 |

在登陆窗体那做了注册功能,可是怎么保证不能重复注册用户名呢?

LSQ  发表于:2013-12-13 16:10:59  
复制

我现在做的注册,可以注册,就是有2个缺点,一个是能重复注册,还有个是密码的问题,我注册的密码不区分大小写,比方说我注册的密码是    QW ,可我登陆的密码用了qw 也登陆进去了,这怎么解决呢,老师,求解释。解释下这2个问题。

下面是注册代码:



Private Sub 取消_Click()
 If Len(Nz(Me.姓名)) = 0 Then
        DoCmd.Close
    Else
        DoCmd.DoMenuItem acFormBar, acEditMenu, acUndo, , acMenuVer70
        DoCmd.Close
    End If
End Sub


Private Sub 确定_Click()
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
 DoCmd.Close
MsgBox "注册成功,请登陆"
End Sub


 

Top
在水一方 发表于:2013-12-13 20:54:15

1.重复注册的问题,可以在用户名更新后事件用Dcount函数校验一下即可。例如dcount("用户名","用户表","[姓名]='"& me.用户名&“‘”)

2.执行区分大小写操作时,将字母文本值被替换为它们的 ASCII 值进行鉴别。例如,A = 65,a = 97,B = 66,b = 98....



麥田 发表于:2013-12-14 14:30:52

思路好像有问题  严格意义上  软件这种存放公司数据信息的管理系统  是不应该有注册功能   即不是人人随随便便注册个帐号就可以使用的

而是应该让软件开发人员(软件管理员)在软件用户\权限模块里面  通过根据实际业务需要  进行手动添加帐号方式  给与相关使用人员帐号权限



麥田 发表于:2013-12-14 14:32:17

登入、注册、修改密码、找回密码[Access软件网]
http://www.accessoft.com/article-show.asp?id=7053

 

有示例一则  去参考试试



LSQ 发表于:2013-12-17 13:47:56
麦老师,不会出现重复注册吧!谢谢,先看看。大侠们都谢谢

殷小宝 发表于:2013-12-17 22:53:29

if chr(me.注册密码)=chr(me.确认密码) then

msgbox "注册成功",vbinformation,""

end if

 



总记录:5篇  页次:1/1 9 1 :