用于向用户分配类别的 MS 访问表单

Question

我遇到了一个小问题。我使用的是 MS Access 2003（我们的服务器上也是 2010）。

我有一个用户表、一个类别表和一个 user_to_category 表。

我将如何创建一个显示所有类别（带有复选框）的表单，当我单击每个类别时，它会将类别 ID 和用户 ID（来自会话）添加到 user_to_category 表中。

我创建了单独的复选框并使用了 onClick 事件，但我需要动态加载类别列表，因为人们会添加更多类别，而我不想手动添加它们。

有什么想法吗？我考虑过使用带有类别的列表框，然后允许用户选择多个条目 - 然后将其添加到表中..但不确定这是最好的方法吗？

感谢您提供任何信息！

Answer 1

创建一个连续表单，将此查询作为其记录源，并将该表单命名为 frmUsers。

SELECT
    u.userID,
    u.user_name
FROM Users AS u
ORDER BY u.user_name;

使用此记录源创建第二个表单fsubUserCategories。

SELECT
    u2c.userID,
    u2c.categoryID,
    cat.category_name
FROM
    user_to_category AS u2c
    INNER JOIN Categories AS cat
    ON u2c.categoryID = cat.categoryID
ORDER BY cat.category_name;

添加一个用于category_name 的绑定文本框，以及一个绑定到categoryID 的组合框cboCategoryID。使用此查询作为组合的行源属性。

SELECT
    cat.categoryID,
    cat.category_name
FROM
    Categories AS cat
    LEFT JOIN (
        SELECT categoryID
        FROM user_to_category
        WHERE userID=Forms!frmUsers!txtUserID
        ) AS sub
    ON cat.categoryID = sub.categoryID
WHERE (((sub.categoryID) Is Null))
ORDER BY cat.category_name;

展开 frmUsers 的页脚部分，并将 fsubUserCategories 添加到页脚中的子表单控件。使用 userID 作为子表单控件上的链接主/子属性。

通过这种安排，子表单将为与主表单 (frmUser) 中的当前用户关联的每个类别分配显示一行。

使用 frmUsers On Current 事件重新查询子表单组合 --- 因此它会更新为仅包含当前用户可用（未分配）的类别。

Form_frmUsers：

Private Sub Form_Current()
    ' Note: fsubUserCategories is the name of the subform control '
    ' my subform control uses the same name as the form it contains '
    ' but beware --- the names don't have to match --- double-check! '
    Me.fsubUserCategories.Form.cboCategoryID.Requery
End Sub

在 fsubUserCategories 中，再次从“删除后确认”、“插入后”和“更新后”事件中重新查询 cboCategoryID，以便更新为仅包含当前用户可用的未分配类别。

Form_fsubUserCategories：

Private Sub Form_AfterDelConfirm(Status As Integer)
    Me.cboCategoryID.Requery
End Sub

Private Sub Form_AfterInsert()
    Me.cboCategoryID.Requery
End Sub

Private Sub Form_AfterUpdate()
    Me.cboCategoryID.Requery
End Sub

此方法允许您查看每个用户的类别分配。您还可以从子表单中添加或删除行来管理这些分配。

Answer 2

当您使用 MS Access 时，最简单的方法是创建一个连续表单，其中类别表作为 RecordSource。

您可以在复选框的 onClick 事件中检查当前类别（=刚刚单击的类别），只需在表单上放置一个带有类别 ID 的文本框并检查文本框的值（它将始终包含 ID）当前单击的记录）。