访问 VBA - 保存加入 table 记录问题
Access VBA - Save join table record issues
我在加入 table 时遇到编辑和保存记录的问题。这是我的 tables:
Table1:
ID_Table1 (PK)
Name
Surname
Table2:
ID_Table2 (PK)
Street
Address
JoinTable:
ID_Table1 (FK)
ID_Table2 (FK)
下面我来解释一下,希望你能明白....
我有一个表格,其中包含 Table1 记录的记录源。当我右键单击当前记录时,我使用以下代码打开带有 JoinTable 记录源的表单:
DoCmd.OpenForm "JoinForm", , ,"ID_Table1=" & Forms![Table1Form].Form![ID_Table1]
此代码应该在 Table1Form 中选择的确切记录上打开 JoinForm,如果 JoinTable 中已经有任何相关记录。但是它不能正常工作。
我的 JoinForm 结构:
我已将 ID_Table2 字段替换为列出 Table2 记录的组合框并存储它在 ID_Table2 字段(FK - JoinTable)中选择的值。
对于 ID_Table1 (FK) - 我删除了它,而不是我添加了使用 DLookup 函数显示 Table1 中正在编辑的记录的文本框(用户要求)。
因此,第一个问题是在您尝试保存记录时存储 ID_Table1(FK)。我通过在用户选择组合框值时保存它的值来解决这个问题 - 在 Before_Update 事件中:
Me.ID_Table1= Forms![Table1Form].Form!
这成功更新了 JoinTable 中的两个字段(ID_Table1 和 ID_Table2),但是当我关闭 JoinForm 并通过右键单击 Table1Form 重复打开 JoinForm 时,没有显示记录,尽管它们存在在具有此 ID_Table1 记录的 JoinTable 中。这是第二个问题。
任何人都可以告诉我这个 JoInForm 的正确构造,或者关于如何解决这个问题的任何其他想法,这令人沮丧!!
我不知道出了什么问题,但我重新创建了 Joinform,现在一切正常。我猜是某种形式或数据库损坏或访问错误,我不知道。问题已解决。
我在加入 table 时遇到编辑和保存记录的问题。这是我的 tables:
Table1:
ID_Table1 (PK)
Name
Surname
Table2:
ID_Table2 (PK)
Street
Address
JoinTable:
ID_Table1 (FK)
ID_Table2 (FK)
下面我来解释一下,希望你能明白....
我有一个表格,其中包含 Table1 记录的记录源。当我右键单击当前记录时,我使用以下代码打开带有 JoinTable 记录源的表单:
DoCmd.OpenForm "JoinForm", , ,"ID_Table1=" & Forms![Table1Form].Form![ID_Table1]
此代码应该在 Table1Form 中选择的确切记录上打开 JoinForm,如果 JoinTable 中已经有任何相关记录。但是它不能正常工作。
我的 JoinForm 结构:
我已将 ID_Table2 字段替换为列出 Table2 记录的组合框并存储它在 ID_Table2 字段(FK - JoinTable)中选择的值。
对于 ID_Table1 (FK) - 我删除了它,而不是我添加了使用 DLookup 函数显示 Table1 中正在编辑的记录的文本框(用户要求)。
因此,第一个问题是在您尝试保存记录时存储 ID_Table1(FK)。我通过在用户选择组合框值时保存它的值来解决这个问题 - 在 Before_Update 事件中:
Me.ID_Table1= Forms![Table1Form].Form!
这成功更新了 JoinTable 中的两个字段(ID_Table1 和 ID_Table2),但是当我关闭 JoinForm 并通过右键单击 Table1Form 重复打开 JoinForm 时,没有显示记录,尽管它们存在在具有此 ID_Table1 记录的 JoinTable 中。这是第二个问题。
任何人都可以告诉我这个 JoInForm 的正确构造,或者关于如何解决这个问题的任何其他想法,这令人沮丧!!
我不知道出了什么问题,但我重新创建了 Joinform,现在一切正常。我猜是某种形式或数据库损坏或访问错误,我不知道。问题已解决。