[Resolvido] pegando linhas de um arquivo com fso

[Jow Xavier 0]

Tenho um script fso onde eu consigo ver o conteúdo de um arquivo .txt ... O meu arquivo txt tem a seguinte estrutura ...

 

Nome Sobrenome

José Sampaio

Maria Helena

Carlos Silva

 

Gostaria de mostrar cada linha do txt ... tipo ...

 

linha1

Nome Sobrenome

José Sampaio

 

linha2

Nome Sobrenome

Maria Helena

 

linha2

Nome Sobrenome

Carlos Silva ... Abaixo o script q eu tenho até o momento ...

 

<% 
'O parâmetro forReading é utilizado somente para leitura. 
Const forReading = 1, forWriting = 2, forAppending = 8 

'Instância o objeto FSO. 
Set Fso = CreateObject("Scripting.FileSystemObject") 

'O método GetFile retorna o arquivo existente. 
'response.write server.mappath(".") & "\testenivel\teste.txt"
Set ObjFile = Fso.GetFile(server.mappath(".") & "/teste.txt") 

'O método OpenAsTextStream abre o arquivo como sendo um fluxo de texto. 
Set objStream = ObjFile.OpenAsTextStream(forReading,false) 

'Looping para varrer todas as linha do arquivo. 
While Not ObjStream.AtEndOfStream 

'O método Readline lê uma linha de um arquivo 
Linha = Linha & ObjStream.Readline & "<br>" 
Wend 


'Mostra o conteúdo. 
Response.write Linha

'Fecha o arquivo. 
objStream.Close 

'Destruíndo objetos 
Set Fso = nothing 
Set objStream = nothing 
%>

[Mário Monteiro 179]

so colocar para escrever o numero da linha dentro do loop e criar um contador

[xanburzum 169]

dá um

 

while not fsofile.AtEndOfStream = true
while not fsofile.AtEndOfStream = true
			linha=fsofile.readline
			response.Write("Nome Sobrenome" & "<br>")
			response.Write linha & "<br>"
wend

[Jow Xavier 0]

heheh resolvido valeu galera

[Mário Monteiro 179]

que bom que resolveu

 

parabens