[Resolvido] Vetor alfabético

[Lucas_Dragon 0]

Olá pessoal...

 

Sou novo aqui na área e estou com um probleminha que não achei uma solução ainda para resolve-lo.

Tenho a seguinte rotina:

 

<%
Dim ar, i

ar=array("Marcelo","Giovana","Carlos","Alexandre")
response.write "Antes da Ordenação:<BR>"
 
for i = 0 to ubound(ar)
	response.write ar(i) & "<BR>"
next
%>

Necessito colocar o vetor AR em ordem alfabética e escreve-lo na tela. No momento estou listando eles e colocando na tela como aparecem no vetor, mas queria alterar a ordem e colocar em ordem alfabética.

Ja me falaram em um comando SORT() mas não consegui usar.

 

Alguem poderia me ajudar? Obrigado

[Lucas_Dragon 0]

RESOLVIDO GALERA!!!!!!

Ae galera... depois de muito quebrar a cabeça resolvi o problema... criei uma função usando Split que resolveu meu problema... segue abaixo a solução:

 

<script language=JScript runat=server>
	function SortVBArray(arrVBArray)
	{
		return arrVBArray.toArray().sort().join('\b');
	}
</script>

<%
Function SortArray(arrInput)
		SortArray = Split(SortVBArray(arrInput), Chr(8))
End Function


Dim ar, i, vtemp

ar=array("Urso","Macaco","Cachorro","Hipopotamo","Avestruz","Pato","Rato","Gato","Papagaio")
response.write "Antes da Ordenação:<BR>"

for i = 0 to ubound(ar)
	response.write ar(i) & "<BR>"
next

response.write "<p>"

response.write "Depois da Ordenação:<BR>"
for i = 0 to ubound(ar)
	vtemp = SortArray(ar)
next

for j = 0 to ubound (ar)
	Response.Write vtemp(j)&"<br>"
next

%>

Espero que ajude alguem algum dia... Abrasss!!!! http://forum.imasters.com.br/public/style_emoticons/default/joia.gif

 

se alguem sabe de uma maneira mais fácil manda ai... até!

[hargon 64]

Que bom que resolveu. http://forum.imasters.com.br/public/style_emoticons/default/clap.gif

 

Obrigado por postar a solução.

 

 

Obs. Postei a solução do Laboratório de Scripts com os devidos créditos.

[Lucas_Dragon 0]

Obrigado Hargon...

 

Vlw mesmo... Obrigado pelos créditos... http://forum.imasters.com.br/public/style_emoticons/default/joia.gif