access数据库中判断数据的唯一性

swots 2002-12-26 10:45:03
有一个数据录入窗口中有几个文本框,录入数据后点击"保存"按扭,刚刚录入的数据就被保存到数据库中,现在要实现:当数据库中有同样的信息时,提示数据已经录入,请重新输入不同的数据信息.也就是判断数据的唯一性.
不知道具体怎样实现,请大家指导!
...全文
303 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
XLYT 2002-12-26
  • 打赏
  • 举报
回复
最好的办法就是设置主键,然后在保存数据时用on error捕捉主键的冲突错误。
xks 2002-12-26
  • 打赏
  • 举报
回复
If gintTmode = 1 Then
txtSQL = "select * from 表名 where 字段名='" & Trim(text1)& "'"
Set mrc = ExecuteSQL(txtSQL, MsgText)
If mrc.EOF = False Then
MsgBox "已经存在此记录!", vbOKOnly + vbExclamation, "警告"
text1.SetFocus
Exit Sub
End If
mrc.Close
End If

我的窗体为mid窗体

swots 2002-12-26
  • 打赏
  • 举报
回复
哦!先谢谢各位!
我自己试试看
fling_boy 2002-12-26
  • 打赏
  • 举报
回复
上面的方法如果是单机用户可以,如果是多用户会有时间差的问题.
最好把要求不重复的列设成主键,或加上唯一性约束.
这样在保存时如果没有想同的,则保存成功,如果有相同的则会提示出错,再做相应的处理.
OFFICE之门 2002-12-26
  • 打赏
  • 举报
回复
right
tollers 2002-12-26
  • 打赏
  • 举报
回复
strSql="Select * from tablename where f_field='" & txtValue & "'"
rs.open strSql
if not rs.eof then
msgbox "数据重复,请重新输入"
end if

7,759

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧