<table border="0" cellpadding="0" cellspacing="1"> <script language="vbscript"> Dim hex(6) hex(0) = "00" hex(1) = "33" hex(2) = "66" hex(3) = "99" hex(4) = "CC" hex(5) = "FF" Dim i, j, k, h For i = 5 To 0 Step -1 document.Write "<tr>" For j = 0 To 5 For k = 0 To 5 h = hex(i) & hex(j) & hex(k) document.Write "<td title=‘#" & h & "‘ width=‘10‘ height=‘10‘ bgcolor=‘#" & h & "‘></td>" Next Next document.Write "</tr>" Next </script> </table> |
|