请教一个制作登陆密码的问题

xnc_0014 · 发表于 2012-3-15 13:33

各位老师好：
晚辈请教一个问题，如附件。其中有一个窗口，是制作登陆界面所用，其中用户名“张三”的密码为123456，保存在表“系统用户”中。我打算在窗口中登陆（主截面暂时还没有做），但是总是提示密码错误。我用：“MsgBox com用户” 看了一下，发现选择张三时，com用户的值为1，李四则为2，我不明白这是什么原因，就算是ListBox的Index号，也应该“张三=0”啊，请求大家帮帮我吧，谢谢。

确定按钮的代码：
Private Sub login_ok_Click()
Dim userID As Integer
If IsNull(com用户) = False Then
If DLookup("[密码]", "系统用户", "[用户名]=""" & com用户 & """") = txt密码 Then
      userID = DLookup("[id]", "系统用户", "[用户名]=""" & com用户 & """")
      DoCmd.Close
      DoCmd.OpenForm "主窗口"
      Form_主窗口.User = userID
Else
      txt密码 = ""
      txt密码.SetFocus
      MsgBox "密码错误！", vbCritical
End If
End If
End Sub

lhdcxz · 发表于 2012-3-15 14:05

给你一个现成的。

工作簿登录界面—密码=名字.rar (161.56 KB, 下载次数: 512)

ly · 发表于 2012-3-15 14:10

本帖最后由 ly 于 2012-3-15 14:11 编辑

原因有2：
1、表之字段名与下列不符

userID = DLookup("[id]", "系统用户", "[用户名]=""" & com用户 & """")

复制代码

2、窗体组合框“com用户”的绑定列应该是2

xnc_0014 · 发表于 2012-3-15 14:21

哦，对了，谢谢楼上两位高手，作为菜鸟请教一下图中的“列数”和“绑定列”分别起什么作用啊？为什么我把列数改为1，就什么也显示不出来？谢谢。

ly · 发表于 2012-3-15 18:07

本帖最后由 ly 于 2012-3-15 18:08 编辑

xnc_0014 发表于 2012-3-15 15:57
啊，原来如此。我尝试把列数改为1，列宽改为2.54cm，绑定列为2，却仍然不对，难道说列数非要从第一列开始， ...

1、列数为3，对应的列宽0cm;2.54cm;2.54cm，表示第一列隐藏不现示。绑定列可以是1或2或3，但绝不可以是大于4的数字出现。
2、如果需要第10列的数据，何必前9项宽设置为0。应用SQL方法把有用的数据筛选出来就可以了。

xnc_0014 · 发表于 2012-3-15 15:57

本帖最后由 xnc_0014 于 2012-3-15 16:02 编辑

啊，原来如此。我尝试把列数改为1，列宽改为2.54cm，绑定列为2，却仍然不对，难道说列数非要从第一列开始，难道有10列的话，必须先设置前9个项的宽为0，然后再设置第10列，绑定第10列？

ly · 发表于 2012-3-15 15:20

xnc_0014 发表于 2012-3-15 14:21
哦，对了，谢谢楼上两位高手，作为菜鸟请教一下图中的“列数”和“绑定列”分别起什么作用啊？为什么我把列 ...

如果把列数改为1，则列宽不能为0cm

xnc_0014 · 发表于 2012-3-16 11:53

明白了，谢谢大侠指点

莫悠悠 · 发表于 2012-4-25 10:18

请教：登陆密码改为可见怎么设置？

sunleiflfl · 发表于 2012-7-5 17:31

学习!!!!!!!!!!!!!!!!!!

		自动登录	找回密码
密码			免费注册

[求助] 请教一个制作登陆密码的问题