Vous devriez pouvoir faire ceci APRÈS votre insertion :
Faible rsID comme ADODB.Recordset
Placer le rsID = nouvel ADODB.Recordset
rsID.Open « @@IDENTITY CHOISI comme NewID », conn.
rsID de Msgbox (« NewID »)
Faire évidemment ceci avant de fermer votre raccordement d'AGITATION.