Ordenar Alfabeticamente

[AJVEvoluzione]

Hola! quiero ordenar un TXT ejemplo

Andres Gomez
Julio Perez
Martin Veltran
Julia Del Rio

y los que se sigan agregando, que me los ordenen siempre alfabeticamente en el txt cómo hago?

[Myakire]

Una solución rápida sería pasar ese txt a tabla,ordenarlo, y regresarlo a txt.

Saludos

[AJVEvoluzione]

Bien y cómo hago eso?

[Myakire]

eeerrrrr.....¿no esperaras que haga el código o así?

1) Abrir el archivo y leerlo.

Código:

Set fs = CreateObject("Scripting.FileSystemObject")
Set wfile = fs.OpenTextFile(Server.MapPath("textos\setup.txt"))
counter=0
do while not wfile.AtEndOfStream
counter=counter+1
singleline=wfile.readline
response.write (counter & singleline & "<br>")

loop

wfile.close
Set wfile=nothing
Set fs=nothing

2) conforme vas leyendo lineas de texto, vas insertanto en una tabla que priviamente ya creaste. (INSERT ...... etc)

3) Ordenas (Select ...... order By x)

4) Creas un txt con los datos de la tabla


Referencia del FSO:
http://msdn.microsoft.com/library/de...stemObject.asp