Recuperare N IdOrdine

[Sandra]

Buona sera a tutti, tramite un inserimento multiplo inserisco N Ordini.

esempio:

for i=0 to ubound(VarIdArticolo)
IF VarIdArticolo(i) <> "" THEN
sql = "INSERT INTO tblOrdini (IdArticolo,Quantita)"
sql = sql & " values (" 
sql = sql & "" & VarIdArticolo(i)& ", "
sql = sql & "" & VarQuantita(i)& ", "
..............

Ho disogno di recuperare tutti gli IdOrdine appena inseriti.


Grazie.

[optime]

tutti? sarà un bel problema... ci vuole un campo che identifichi il nuovo inserimento

[Sandra]

Fatto.

dim myArray()
Set rs = Server.CreateObject("ADODB.Recordset")
sql = "SELECT IdOrdine from tblOrdini where DataAcquisto='"&VarDataAcquisto&"'"
set rs = conn.execute(sql)
i=0
Do While Not rs.EoF
redim preserve myArray(i)
myArray(i) = rs("IdOrdine")
i = i + 1
rs.MoveNext
Loop
myArray=split(myArray,",")
for i=0 to ubound(totArray)
IF myArray(i) <> "" THEN
sql="Update tblOrdini Set Importo = Prezzo_Vendita * Quantita where IdOrdine="&myArray(i)
conn.Execute sql
end if
next
rs.Close 
Set rs = Nothing