<% dim randnum randnum = aleatorio(5,1,2) For intWriteDigitLoopCount = 1 to Len(randnum) Response.Write("") Next %>       *Maiúsculas e números
 
Facebook do Laboratório Oswaldo Cruz