<%
dim aColor(20)
aColor(1) = "EC780B"
aColor(2) = "0BC4EC"
aColor(3) = "EC2E0B"
aColor(4) = "2FEC0B"
aColor(5) = "0B59EC"
aColor(6) = "ECE80C"
aColor(7) = "ED18D0"
aColor(8) = "8E0BEC"
aColor(9) = "4F90A9"
aColor(10) = "0BEC91"
aColor(11) = "C9763C"
aColor(12) = "B15378"
aColor(13) = "7B7B7B"
aColor(14) = "AC8E4A"
aColor(15) = "74AC4A"
aColor(16) = "B93D46"
aColor(17) = "504ABB"
aColor(18) = "F81200"
aColor(19) = "CBC839"
aColor(20) = "A75E99"
%>
<% for i=1 to ubound(aColor) %>
| <%= i %>: |
#<%= aColor(i) %> |
 |
<% next %>