最后插入的行的自动编号值-MS Access / VBA（值= 0）

Question

我需要获取插入到表中的最后一条记录的自动编号ID（通过INSERT INTO命令）

我在论坛中看到了一些方法，这些方法似乎适用于大多数社区，但不适用于我的情况： Autonumber value of last inserted row - MS Access / VBA

Dim miDDBB As DAO.Database
.....
StrSQL = " INSERT INTO DG_tb_Main " ......   
Set miDDBB = CurrentDb
miDDBB.Execute (StrSQL)
newRow = miDDBB.OpenRecordset("SELECT @@IDENTITY")(0)
Set db = Nothing

使用此代码时，我总是将'newRow'值设为'0'。 我已经检查了SQL表达式并可以正常工作，将新记录插入表中。 ¿我在做什么错了？

致谢

Answer 1

再次研究您自己的参考。

您有DAO，但将方法用于ADO。