如何在一个字段中最多包含n个重复项

时间:2014-08-18 08:24:45

标签: ms-access ms-access-2010 duplicate-data

我认为我的问题有点独特。每个人都希望摆脱重复,但另一方面,我想允许出现指定数量的重复项。

我正在创建一个数据库,用于为献血活动保留日期。

我的数据库由

组成
  1. 广告系列日期,
  2. 组织者名称,
  3. 联系信息&场地。
  4. 此外,每个广告系列都会获得唯一的ID号。问题是,我们每天只能容纳五个广告系列,即:应该允许日期列最多包含五个重复

    关于如何实现这一目标的任何想法?

2 个答案:

答案 0 :(得分:1)

如果要从Access 2010本身直接向表中输入信息,则可以将以下“更改前数据宏”添加到表中:

BeforeChange.png

有关数据宏的详细信息,请参阅

Create a data macro

答案 1 :(得分:0)

这是你需要做的。根据表创建一个新表单。更整洁,也可以捕获您需要的所有信息以及特殊条件,例如您现在拥有的信息。表单可以包含表中存在的所有或部分字段。表单创建后,我们将其称为 frm_EventMgm

您可以创建另一个仪表板/欢迎表单,您可以在其中创建一个TextBox,用于在表格中收集您想要输入的日期( dateEntryTxt )和一个按钮( addNewEntryBtn ),舔将有这个。

Private Sub addNewEntryBtn_Click()
    If Not IsDate(Me.dateEntryTxt) Then
        MsgBox "Please enter a valid date before you proceed.", _
                vbCritical, "Missing Information !"
        Exit Sub
    End If

    If DCount("*", "tbl_EventList", "DateFieldName = " & _
                Format(Me.dateEntryTxt, "\#mm\/dd\/yyyy\#")) > 5 Then
        MsgBox "The Date you selected has already have 5 bookings. " & _
                "So please choose another date and try again.", vbInformation, _
                "Cannot Add info. !"
    Else
        DoCmd.OpenForm "frm_EventMgm", DataMode:=acFormAdd
    End If
End Sub

这是解决问题的最佳方式。希望这可以帮助。