同一数据列如何防止被输入重复的数据 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 同一数据列如何防止被输入重复的数据

共有2675人关注过本帖树形打印复制链接主题：同一数据列如何防止被输入重复的数据

edisontsui

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：七尾狐帖子：1551 积分：10061 威望：0 精华：0 注册：2014/12/18 16:12:00

同一数据列如何防止被输入重复的数据 发帖心情

Post By：2016/6/24 8:48:00 [只看该作者]

某一个数据列，我设置了不允许输入相同的数据。但还是经常被同事输入了相同的数据，导致大家都登录不了系统。甚至我以开发者的身份都无法登录系统。我的额问题是：（1）如何防止输入相同数据这种错误的发生？(2) 万一发生了这种错误，如何登录系统，删除掉相同数据的行？谢谢。

edisontsui

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：七尾狐帖子：1551 积分：10061 威望：0 精华：0 注册：2014/12/18 16:12:00

Post By：2016/6/24 8:57:00 [只看该作者]

(3) 我可以用Acceess软件直接到数据库里面删除重复的数据行吗？

Hyphen

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：狐神帖子：5015 积分：25363 威望：0 精华：0 注册：2015/8/18 9:21:00

Post By：2016/6/24 9:00:00 [只看该作者]

DataColChanging事件参考以下代码

Select Case e.DataCol.Name

Case "RuleCode"

Dim dr As DataRow = e.DataTable.Find("RuleCode = '" & e.NewValue & "' and [_Identify] <> " & e.DataRow("_Identify") )

If dr IsNot Nothing Then

msgbox("规则编码不能重复!")

e.Cancel = True

End If

End Select

灾难恢复：http://www.foxtable.com/help/topics/1057.htm

主题：同一数据列如何防止被输入重复的数据