recuperare l'ultimo id inserito o il prossimo

[tretretre]

salve a tutti

da giorni mi sto rompendo il capo in questo malefico problema.

devo ricavarmi il numero che il database access assegnerà tramite contatore a chiave primaria all'id del nuovo messaggio.

in pratica ho lo stesso problema di questo 3d
http://forum.html.it/forum/showthrea...%40%40IDENTITY

il fatto è che le ho provate di tutte ma non so come impostare il codice.
per ora ho fatto così

<%
Dim cn,cm, numes
Set cn = Server.CreateObject("ADODB.Connection")
cn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& Server.MapPath("/mdb-database/provo.mdb")
set rs=cn.execute ("SELECT @@IDENTITY as ident FROM messaggi")
numes=rs("ident") 'ho provato anche numes=rs(0) 
%> 

ma numes mi restitruisce sempre 0 invece che (attualmente) 5

sapete come si fa?