In una pagina devo inserire un record in una tabella e immediatamente andare a leggerne l'id autoincrementante
Il problema e' che sembra che dopo l'inserimento io non abbia subito disponibile il valore, solo dopo un BACK e un successivo inserimento me lo legge e va avanti.
Qualcuno ha dei suggerimenti
CODICE:
' Inserisco il record dove Idweb è un counter e fin qui funziona
<%
set commDelete = Server.CreateObject("ADODB.Command")
commDelete.ActiveConnection = MM_sito_conn_STRING
commDelete.CommandType = 1
commDelete.CommandTimeout = 0
commDelete.Prepared = true

commDelete.CommandText = "INSERT Into Incarico (idstar, esattore, mandante, mandato, Prodotto, DataArrivo, DataAffidamento, DataScadenza, Stampato) VALUES (" & (incarico.Fields.Item("idSTAR").Value) & " , " & request.form("sub_agente") & "," & (incarico.Fields.Item("Mandante").Value) & " , " & (incarico.Fields.Item("Mandato").Value) & ", " & (incarico.Fields.Item("Prodotto").Value) & " , '" & (incarico.Fields.Item("DataArrivo").Value) & "' , '" & (incarico.Fields.Item("DataAffidamento").Value) & "' , '" & (incarico.Fields.Item("DataScadenza").Value) & "', 'N') "
commDelete.Execute()
%>
' Qui provo a leggere subito il record inserito ma non lo trova
<%
set seleziona = Server.CreateObject("ADODB.Recordset")
seleziona.ActiveConnection = MM_sito_conn_STRING
seleziona.Source = "select idweb from incarico where esattore = " & request.form("sub_agente") & " and mandante = " & (incarico.Fields.Item("Mandante").Value) & " and mandato = " & (incarico.Fields.Item("Mandato").Value) & " and prodotto= " & (incarico.Fields.Item("Prodotto").Value) & " "
seleziona.CursorLocation = 2
seleziona.LockType = 3
seleziona.Open()
%>