Ordenar Por Data

[batera]

É o seguinte, estou com uma dúvida e não sei se é possível fazer isso!

Este código postam em um arquivo .txt, todos os dados de um formulário, mas ele fica em ordem crescente. Teria como fazer isso ao contrário, ou seja, com as ultimas postagens ficarem em 1º?!?!

valeuss

[dark0]

Brother.. eu não entendi muito bem

Mas, quando você adiciona mais conteudo ao txt, você insere no final dele?

porque não vai para o começo dele antes de inserir?

assim, fica como você quer..

[dark0]

ah.. lembrei

Outra opção, seria você colocar todo o TXT em um array, e ordenar o array da forma que você quiser

E depois jogar o array pro txt de novo..

Eu faço isso em php, e sempre funciona, hehehe

Abraços

[batera]

você teria algum exemplo pra eu inserir numa array o conteudo do form?

OK, o código é mais ou menos assim:

strFile = Server.MapPath("guestbook.txt")

Dim objFSO 'FileSystemObject Variable

Dim objFile 'File Object Variable

Set objFSO = Server.CreateObject("Scripting.FileSystemObject")

' Open the TextFile (FileName, ForAppending, AllowCreation)

Set objFile = objFSO.OpenTextFile(strFile, 8, True)

é essa var "objFile" q tem q ir pra array?

[Graymalkin]

A idéia seria algo assim:

Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.OpenTextFile(strFile, 1, True)
texto = objFile.ReadAll()
linhas = split(texto, chr(13) & chr(10))
for each linha in linhas
  msgbox linha
next

Dessa forma, você terá: linha(0) com a primeira linha, linha(1) com a segunda linha

e assim por diante.

Abraços,

Graymalkin