最后插入行的自动编号值 - MS 访问 / VBA(值 = 0)

Question

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

我在论坛中看到了一些方法，这些方法似乎适用于大多数社区，但就我而言并非如此：最后插入行的自动编号值 - MS 访问/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 的方法。