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'''''''''''''''''''''%>