从 1 个表单填充 2 个访问表

Question

我正在使用 Microsoft Access 2010 来简化我的小团队的一些流程。我有一个链接到 table (Table A) 的表单，用户填写该表单以记录信息。我有第二个 table (Table B)，我想将信息复制到提交或 GoToRecord.acNewRec 。第一列中的 1 列 table 我想输入一个特定的值，例如 "Type A"。我尝试使用连接到表单 A 的表单上的 Click() 执行以下操作：

Private sub ButtonSave_Click()
DoCmd.RunSQL ' INSERT INTO Table B (Item1, Item2, Item3) VALUES (FormItem1.Value, FormItem2.Value, FormItem3.Value)', True
DoCmd.GoToRecord , , acNewRec

这让我在 DoCmd.RunSQL 上出现语法错误我还尝试了以下方法：

Private sub ButtonSave_Click()
Dim SQL As String
SQL = "INSERT INTO Table B (Item1, Item2, Item3) VALUES (" & FormItem1.Value & "," & FormItem2.Value & "," & FormItem3.Value & ");"
DoCmd.RunSQL SQL, True
DoCmd.GoToRecord , , acNewRec

这也表示在 INSERT TABLE 行结束表达式。我感到很困惑。我在整个 Stack Exchange 上进行了谷歌搜索，并尝试了所有其他问题建议，但我不断收到语法或表达式错误。我做错了什么？

Answer 1

似乎我在执行此操作时遇到了一些语法问题，我不得不做更多的研究并询问以 VB 为中心的朋友。

这里的想法是当您单击保存按钮并打开一个新记录时，使用 SQL 将表单中的数据插入到另一个 table。我需要在正确的区域使用正确的 [ ] 和 ""。

Dim sSQL As String
sSQL = "Insert INTO [table2] (Item1, Item2, Item 3) VALUES (FormItem1.Value, FormItem2, Value, 'Title')"
DoCmd.RunSQL (sSQL)
DoCmd.GoToRecord , , acNewRec

从 1 个表单填充 2 个访问表

Populating 2 Access Tables From 1 Form

vba

ms-access-2010