l'unica è fare prima un'insert vuota, ricavare l'ultimo id generato, e usarlo....
codice:
sql="insert into tabella(campo) values('')"

conn.execute(sql)

set rs=conn.execute("select @@identity from tabella")

dim lastId

lastId=rs(0)

oppure ti fai una stored procedure che ti inserisca il record che vuoi e ti restituisca direttamente l'id che ha usato... cmq il procedimento piu corretto dal punto di vista di buona programmazione è il primo