Fare un Insert + Update contemporaneamente

[Partisan75]

for i = 0 to 10

for y = 0 to 100

next

NEXT

niente da fare, riesco ad arrivare fino a qui:


UPDATE USERS SET USE_CODICE_SCONTO = 'EMYR5U54XRXJ96O' WHERE USE_ID = '1'
UPDATE USERS SET USE_CODICE_SCONTO = 'EMYR5U54XRXJ96O' WHERE USE_ID = '8392'
UPDATE USERS SET USE_CODICE_SCONTO = 'EMYR5U54XRXJ96O' WHERE USE_ID = '8393'
UPDATE USERS SET USE_CODICE_SCONTO = 'EMYR5U54XRXJ96O' WHERE USE_ID = '8394'
UPDATE USERS SET USE_CODICE_SCONTO = 'EMYR5U54XRXJ96O' WHERE USE_ID = '8395'

cioè mette sempre lop stesso codice +
questo errore:

Errore di run-time di Microsoft VBScript error '800a000d'
Tipo non corrispondente
/italiano/admin/genera_codici.asp, riga 143