Facendo come sotto mi riporta il volore 0 e non va bene.
Dove sbaglio?.
Ciao.


'Settaggio recordset objRS
Set objRs = Server.CreateObject("ADODB.Recordset")

'Query
strSql = "select @@identity FROM barche"

'Apertura del recordset ed esecuzione della query
Set objRs = Server.CreateObject("ADODB.Recordset")
objRs.Open strSql, ConnectString("team"), 3, 3

' Se la query restituisce un valore
if not objRs.eof then
' valorizza la variabile
ultimo_id = objRs(0)
end if

'Chudura e distruzione dell oggetto recordset
objRs.Close
Set objRs = Nothing
'Chiusura connessione "conn"