Copiar los codigos y pegar

<% Dim numero_azar2 'Empezamos la función Ramdomize. randomize 'Buscamos solo 5 valores. numero_azar2=int(rnd*5)+1 ' Basandonos en el número hacemos un Case Select. select case numero_azar2 'En caso de que el numero sea 1... el color será... case "1" color ="#003366" 'En caso de que sea 2... Case "2" color ="#006633" Case "3" color ="#999966" Case "4" color ="#663399" Case else color ="#660000" end select %> <!--Mostramos el color y su código --> <font color="<%=color%>">Este color es: <b> <%=color%> </b> <br> <br> <a href="../../ASPScripts/mismapagina.asp"> <font color="<%= color %>">Para actualizar, haga click aqui! </a>