哪里错了 求大神解答 ACCESS的注册窗口代码

[复制链接]
查看11 | 回复2 | 2013-6-15 14:48:29 | 显示全部楼层 |阅读模式
Dim cond As String'定义变量cond = "name='" + Forms![注册新用户]![Text0] + "'"连接表If IsNull(DLookup("name", "password", cond)) Then'判断MsgBox "注册成功", vbOKOnly, "信息提示"'提示框Adodc1.Recordset.AddNew'添加数据Adodc1.Recordset.Fields("name") = Text0.Text‘用户名Adodc1.Recordset.Fields("pass") = Text2.Text‘密码Adodc1.Recordset.UpdateElse...
回复

使用道具 举报

千问 | 2013-6-15 14:48:29 | 显示全部楼层
MsgBox "用户已存在", vbOKOnly, "信息提示"用户已存在。可能是有人在你之前注册了。也可能你自己注册两次(重复注册)。用你的用户名和密码登陆试试。如果不行就要重新注册了。个人见解,仅供参考,如有帮助,请点击下面的【选为满意回答】,谢谢鼓励!...
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行