Question

对于冗长的介绍感到抱歉，但我认为最好解释一下我的问题。我有一个Access 2003数据库，用户需要根据表中已有的记录创建新记录。数据库的一些用户通常更熟悉计算机并通过...创建新记录。

1. Selecting a previous record in a datasheet and copying it (via right click -> Copy)
2. Selecting new row in the datasheet and "pasting" the previous record (via right click => Paste)
3. Edit the newly pasted row with the new data

这可以正常工作，因为数据表基于的表使用“自动编号”字段来防止重复。我遇到的问题是这个数据库的一些用户不是那么“电脑贪婪”，并且右键点击等有困难...我被要求创建一个按钮...

1. Copies the previous record
2. Inserts it into datasheet

然后，用户可以根据需要编辑新记录。这引出了我的问题。如何复制记录然后以编程方式将其插入数据表中？感谢您的任何建议。

Answer 1

使用追加查询。

一些注意事项：

s = "Insert Into TableX (Field1, Field2, Field3) " _
  & "Select Field1, Field2, Field3 From TableX " _
  & "Where ID=" & Forms!TableXForm!ID

CurrentDb.Execute s

Forms!TableXForm.Requery

MS Access：以编程方式复制/粘贴所选记录？

1 个答案: