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

Question

这个问题在这里已有答案：

• Autonumber value of last inserted row - MS Access / VBA 5个答案

我需要获取插入表中的最后一条记录的Autonumbered 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的方法。