ARQUIVO.TXT
Galera como eu crio um arquivo txt , e escrevo dados nele, e a kda escrita eu pulo de linha???
Open "C:\Arquivo.Txt" For Append As #1
Print #1, "Texto"
Close #1
Ai cada vez que você gravar nele, automaticamente ira gravar na linha de baixo. ok.
Print #1, "Texto"
Close #1
Ai cada vez que você gravar nele, automaticamente ira gravar na linha de baixo. ok.

Tipo, num sei bem se é isso que você quer, mas aà vai.
dim txt
txt = freefile
open "c: este.txt" for output as #txt
print #txt, "1Âê Linha" 'Imprime a primeira linha
print #txt, vbcrlf 'Linha em brando
print #txt, "2Âê Linha" 'Imprime a segunda linha
close
dim txt
txt = freefile
open "c: este.txt" for output as #txt
print #txt, "1Âê Linha" 'Imprime a primeira linha
print #txt, vbcrlf 'Linha em brando
print #txt, "2Âê Linha" 'Imprime a segunda linha
close
Olá pessoal,
e no caso de gravar uma informação E ELE NÃO CRIAR AUTOMATICAMENTE NA LINHA DE BAIXO...
alguém poderia me ajudar...
e no caso de gravar uma informação E ELE NÃO CRIAR AUTOMATICAMENTE NA LINHA DE BAIXO...
alguém poderia me ajudar...
Ou você faz assim
dim txt
txt = freefile
open "c: este.txt" for output as #txt
print #txt, "1Âê Linha" 'Imprime a primeira linha
print #txt, vbnewline 'Vai pra linha de baixo
print #txt, "2Âê Linha" 'Imprime a segunda linha
print #txt, vbnewline 'Vai pra linha de baixo
print #txt, "3Âê Linha" 'Imprime a terceira linha
print #txt, vbnewline 'Vai pra linha de baixo
print #txt, "4Âê Linha" 'Imprime a quarta linha
print #txt, vbnewline 'Vai pra linha de baixo
close
Ou você escreve todo o seu texto em um textbox e faz assim
dim txt
txt = freefile
open "c: este.txt" for output as #txt
print #txt, text1.text
close
dim txt
txt = freefile
open "c: este.txt" for output as #txt
print #txt, "1Âê Linha" 'Imprime a primeira linha
print #txt, vbnewline 'Vai pra linha de baixo
print #txt, "2Âê Linha" 'Imprime a segunda linha
print #txt, vbnewline 'Vai pra linha de baixo
print #txt, "3Âê Linha" 'Imprime a terceira linha
print #txt, vbnewline 'Vai pra linha de baixo
print #txt, "4Âê Linha" 'Imprime a quarta linha
print #txt, vbnewline 'Vai pra linha de baixo
close
Ou você escreve todo o seu texto em um textbox e faz assim
dim txt
txt = freefile
open "c: este.txt" for output as #txt
print #txt, text1.text
close
Obrigado GUGSDAJUBS,
porém eu não queria que ele fosse para linha de baixo
Atenciosamente,
jmangas
porém eu não queria que ele fosse para linha de baixo
Atenciosamente,
jmangas
Use o ponto e virgula no fim da linha, assim você mantém o ponteiro do arquivo na linha atual.
'Teste este código...
Open "c:\vbmania.txt" for output as #4
print #4, "Esta é a primeira linha";
print #4, "de um arquivo tão grande";
print #4, "que preciso imprimir o conteúdo";
print #4, "em partes separadas.";
Close #4
Muito obrigado a vcs.....
Eu faço assim muito similar ao Webmaster
Open "C:\Ok.txt" For Output As #1
Print #1, "Esta informação " & _
"Realmente é muito " & _
"Grande!!!
Close #1
Tópico encerrado , respostas não são mais permitidas