如何得到新增记录的自动编号字段值

最新推荐文章于 2020-12-22 08:04:11 发布

原创最新推荐文章于 2020-12-22 08:04:11 发布 · 654 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#null

数据库专栏收录该内容

27 篇文章

订阅专栏

本文介绍了一种在Access中使用ADODB.Recordset进行记录更新的方法。通过设置正确的游标位置为adUseServer，确保了在AddNew操作后能够获取到有效的ID值。此技巧避免了因游标设置不当而导致ID值显示为NULL的问题。

很简单，先取id后update。不过，要注意的是，这时cursor的位置要设为adUseServer。因为，如果设为adUseClient，那AddNew之后得到的ID值是NULL。

 
     Set rstNewDetail = New ADODB.Recordset
    With rstNewDetail
         .ActiveConnection = CurrentProject.Connection
        .Source = strDetailTable
        .CursorLocation = adUseServer
        .CursorType = adOpenDynamic
        .LockType = adLockOptimistic
        .Open Options:=adCmdTableDirect
    End With
    With rstNewDetail
        .AddNew
        lId = .Fields("lngId")
        .Update
    End With