Gerando Arquivo TXT

[Gilberto Jr 26]

Pessoal, boa tarde;

estou com um probleminha no codigo que gero o arquivo txt. Veja o codigo abaixo.

' Criando o objeto de gravação do arquivo
Set FSO = Server.CreateObject("Scripting.FileSystemObject")
' Preparando o caminho (Path) do arquivo
caminho = Server.MapPath("arquivos/"&pathrede&"/"&pathloja&"/CADNF.txt")
 
Set GRAVAR = FSO.CreateTextFile(caminho,true)
 
'Foi criado o objeto e logo após busca o htm em caminho para gravar. Se não achar, vai criá-lo (devido à marcação TRUE)
response.Write(chr(13))
while rs.eof=false
 
GRAVAR.Writeline (rs("notafiscal")&" "&rs("base_calculo")&" "&rs("valoricms")&" "&mask_datac(rs("recebimento")))
 
rs.movenext
wend
 
 
GRAVAR.close
 
arquivo = "CADNF.txt"
 
dim objStream
set objStream = server.createObject("ADODB.Stream")
with (response)
.buffer = true  
.addHeader "Content-Type","application/x-msdownload"
.addHeader "Content-Disposition","attachment; filename="&arquivo
.flush  
end with
with (objStream)
.open  
.type = 1  
.loadFromFile server.mapPath("arquivos/"&pathrede&"/"&pathloja&"/"&arquivo)
end with
response.binaryWrite objStream.read
set objStream = nothing
response.flush
 
Response.Clear

E o arquivo texto fica assim, na primeira linha antes de imprimir os dados que esta vindo do banco de dados. Ele coloca a DATA ATUAL e também a HORA, MINUTO e o SEGUNDO.

E depois que acaba de imprimir as informações do banco de dados. Ele acrescenta uma linha sem conteúdo. Eu gostaria de tirar essa informação DATA ATUAL e também a HORA, MINUTO e o SEGUNDO inicio do arquivo e a linha sem conteudo que fica no final do arquivo.

2016112415415823413 921,3 64,49 20161122

39183 1006,08 120,72 20161025

39184 597,6 71,72 20161025

39185 1193,04 143,16 20161025

39186 2108,16 252,96 20161025

LINHA EM BRANCO

Se alguém puder me ajudar eu fico muito agradecido.

Att;

[houseinf 0]

boa tarde...

não entendo muito do asp pq estou começando.

localizei este tópico prá ver se você consegue resolver.

http://forum.imasters.com.br/topic/323715-resolvido-fso-criar-gravar-ler-mover-copiar-e-excluir/

depois você me conta...

Fique com Deus !

[Gilberto Jr 26]

Obrigado, eu fiz uma mudança no codigo e agora ele esta gerando o arquivo sem a data, hora, minuto e segundos na primeira linha.

Porem, na hora que faz o download ele esta colocando uma linha sem conteudo no final do arquivo.

Mas o fato de ter uma linha sem conteudo, não atrapalha, o sistema BAT consegui rodar normalmente.

Obrigado @HOUSEINF

Att;

[houseinf 0]

:)

[houseinf 0]

agora... se você puder acompanhar meu tópico q fala do cpf e me ajudar ... :rolleyes: