Ordenar Valores Variaveis

[Rinaldo]

Boa tarde.

Se tenho alguns valores de variáveis, como posso ordená-lo para mostrá-los?

Ex.

a = 4

b = 5

c = 1

d = 3

e = 2

saia

1

2

3

4

5

Obrigado.

[bareta]

na sua sql adicione a coluna que ira dar a ordem a eles:

sql="select * from tabela oder by campo asc"
set rs=conn.execute(sql)

o order by faz isso....

asc=crescente

desc=decrescente

[Rinaldo]

Sim, no entanto esses valores não estão em um banco ainda. As variáveis foram recebidas através de um form. Gostaria de ordená-las para mostrá-las e, se os valores estiverem de acordo, aí sim armazená-las num banco.

Obrigado.

[fercosmig]

se ajudar beleza!

<%
FUNCTION SortArray(varArray)
For i = UBound(varArray) - 1 To 1 Step - 1
MaxVal = varArray(i)
MaxIndex = i

For j = 0 To i
If varArray(j) > MaxVal Then
MaxVal = varArray(j)
MaxIndex = j
End If
Next

If MaxIndex < i Then
varArray(MaxIndex) = varArray(i)
varArray(i) = MaxVal
End If
Next 
END FUNCTION

REDIM arrSORT(5)

arrSORT(0)=4
arrSORT(1)=5
arrSORT(2)=1
arrSORT(3)=3
arrSORT(4)=2

Response.write "<TABLE BORDER=1 WIDTH=100% ><TR><TD><B>UNSORTED</B></TD><TD><B>SORTED</B></TD></TR>"
Response.write "<TR><TD>"

FOR i = 0 TO UBOUND(arrSORT) - 1
Response.write "<B>arrSORT(" & i & ") value: </B>" & arrSORT(i) & "<BR>"
NEXT

Response.write "</TD><TD>"

SortArray arrSORT

FOR i = 0 TO UBOUND(arrSORT) - 1
Response.write "<B>arrSORT(" & i & ") value: </B>" & arrSORT(i) & "<BR>"
NEXT


Response.write "</TD></TR></TABLE>"
%>

não foi eu que fiz! somente copiei e testei o código!

abraços

[aferlim]

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

[Rinaldo]

Valeu cara.

Serviu para o que eu precisava.

Muito obrigado.