Office中国论坛/Access中国论坛

标题: 我这个登陆错在那？？？（已解决） [打印本页]

作者: bbs207 时间: 2008-2-21 09:09
标题: 我这个登陆错在那？？？（已解决）
[attach]28524[/attach]
新手请教。。。。。。

[ 本帖最后由 bbs207 于 2008-2-21 16:07 编辑 ]

作者: fswxs 时间: 2008-2-21 10:19
看了一下，你错的太多了。论坛上有大把现成的，抄一个好过

作者: dreamice01 时间: 2008-2-21 10:28
标题: 回复 1# 的帖子
将代码改为：

if  (dlookup("密码","user","用户='"&mc&"'"))=mm then
  docmd.close
  docmd.open "main",normal
else
  msgbox "密码错误"
endif

作者: bbs207 时间: 2008-2-21 14:54
If IsNull(Me.yh) = False Then
Dim a As String
Dim b As String
a = DLookup("用户", "userb", "用户= '" & Me.yh.Column(1) & "'")
b = DLookup("密码", "userb", "用户= '" & Me.yh.Column(1) & "'")
End If

这代码错在那，提示无效使用 Null

作者: fswxs 时间: 2008-2-21 15:55
Me.yh.Column(0)

作者: yasen88 时间: 2008-3-26 20:42
看了一下

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