Grazie dei consigli.
Ho cercato nel forum SELECT @@IDENTITY e nel mio caso ho trovato un esempio che mi sembra non la renda necessaria:
- ho effettuato l'inserimento del record e prima di chiudere la connessione ho effettuato una select che mi riapre il record:

Set RecSet = Server.CreateObject("ADODB.Recordset")
Addera = "SELECT * FROM news"
RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic, idInserimento

RecSet.AddNew
idInserimento = RecSet("id")
RecSet("Title") = Replace(Server.HTMLEncode(Request.Form("title")), chr(13), "
", 1)
RecSet("Sommario") = Replace(Server.HTMLEncode(Request.Form("sommario") ), chr(13), "
", 1)
RecSet("Message") = Replace(Server.HTMLEncode(Request.Form("message")) , chr(13), "
", 1)

RecSet.Update
RecSet.Close

Qui ho riaperto il record

RecSet.Open "SELECT top 1 id,link,title FROM news order by id desc"
Response.Write (RecSet.GetString(,,"", ""))
Connect.Close

E tutto funziona correttamente in quanto il Response.Write mi visualizza il numero dell'ultimo ID

A me serve però scrivere nel record il campo "link" con il numero dell'ID
Ho fatto tanti tentativi ma non riesco ad arrivare
es.
RecSet("link") = http://www.nomesito.it/notizia.asp?nyhetsID='" & RecSet.GetString(,,"", "") & " '
Connect.Close