Desenvolvi um mais simples pra você amigo! <% 'exibir numeros em ordem crescente Response.write"<br>" dim a,b,c,d,e,f,g a=4 b=5 c=1 d=3 e=2 f=7 g=6 total=10 ordem = array(a,b,c,d,e,f,g) dim resultado(100) for i2=0 to 6 for i=0 to total if ordem(i2)=i then resultado(i)=ordem(i2)&"," end if next next for i=0 to total Response.write (resultado(i)) next '---------fim'''''''''''''''''''''%>