Salve ho un problema su un tipo di dato quando lo confronto:

Randomize()
rndID1 = CInt((numerogiochi - 1)*Rnd() + 1 )
rndID1 = arraygiochi(rndID1)

DO
Randomize()
rndID2 = CInt((numerogiochi - 1)*Rnd() + 1 )
rndID2 = arraygiochi(rndID2)

IF rndID1<>rndID2 then <----------
variabile=TRUE
END IF
LOOP UNTIL variabile

Errore:

Microsoft VBScript runtime error '800a000d'
Type mismatch
/index.asp, line 514

Grazie