将表单框中的值插入表格的最后一条记录

Posted 2023-04-19

【中文标题】将表单框中的值插入表格的最后一条记录

【英文标题】：Insert values from form boxes into last record of table

【发布时间】：2018-12-20 15:36:20

【问题描述】：

我有一个非常大的子例程，可以打开表单并将值插入文本框并保存更改。它可以工作，但是它将这些值插入到随机行中，而不是表中的最新记录中。我还尝试过执行相同操作的 INSERT INTO VALUES 查询（通过 VBA 和常规 SQL 查询）。是否可以将这些值添加到相应表的最后/第一行？主键是自动编号。

DoCmd.OpenForm "dentalheader", acNormal , , , , acHidden
    Forms!dentalheader!yeartype.Value = "Benefit"
    Forms!dentalheader!term.Value = "80"
    Forms!dentalheader!personmax.Value = "99999"

INSERT INTO dentalheader (each, overallmax, personmax,) 
VALUES (true, '10000', '99999', )

【参考方案1】：

添加一个日期时间字段并插入现在：

INSERT INTO dentalheader (timestamp, each, overallmax, personmax) 
VALUES (Now(), true, '10000', '99999' )

然后，为了显示，按时间戳排序。

【讨论】：

不会每次都覆盖上一次做的吗？我的表已链接，因此我必须先在服务器上对其进行编辑，然后才能进行测试。

怎么可能？它插入一条新记录。数据库不是电子表格；没有“第一条”或“最后一条”记录。