コミュニティでの活動の履歴として、自身(Orator/魔界の仮面弁士)が掲示板・Mailing List・Newsgroup等へ発言した内容の中で、再利用できそうな物を拾い出して、掲載しています。

« 2002年11月 | Main | 2003年01月 »
[Jet 4.0] 最後のオートナンバー値を取得する / 2002年12月27日(金)

最後に挿入されたオートナンバー値を取得するには、@@IDENTITY変数が利用できます。


[12/27/2002]Users Group([Access:11913])

Dim Cn As ADODB.Connection
'     :
' (Insert処理)
'     :
Debug.Print Cn.Execute("SELECT @@IDENTITY").Collect(0)

 
Posted at 18:17 / Jet/Access / この記事のURL
コメント(0)
P R

Microsoft Most Valuable Professional, Visual Developer - Visual BasicMSMVP for Visual Basic


Global Media Online INC.