ARQUIVO EM CAMINHO DO TEXTBOX
Como criar arquivo em pasta especificada pelo usuário ?
---- código que cria o arquivo ----
Dim ARQUIVO As String = [Ô]teste.txt[Ô]
Dim i As Integer
Dim aryText(4) As String
aryText(0) = [Ô]texto 01[Ô]
aryText(1) = [Ô]texto 02[Ô]
aryText(2) = [Ô]texto 03[Ô]
aryText(3) = [Ô]texto 04[Ô]
aryText(4) = [Ô]texto 05[Ô]
Dim objWriter As New System.IO.StreamWriter(ARQUIVO, True)
For i = 0 To 4
objWriter.WriteLine(aryText(i))
Next
objWriter.Close()
MsgBox([Ô]Arquivo Criado com Sucesso![Ô])
------------ FIM DO CÓDIGO -------------
Eu quero Criar o arquivo acima no caminho da pasta informada pelo [Ô]TextBox[Ô]
alguém pode mim ajudar ??
---- código que cria o arquivo ----
Dim ARQUIVO As String = [Ô]teste.txt[Ô]
Dim i As Integer
Dim aryText(4) As String
aryText(0) = [Ô]texto 01[Ô]
aryText(1) = [Ô]texto 02[Ô]
aryText(2) = [Ô]texto 03[Ô]
aryText(3) = [Ô]texto 04[Ô]
aryText(4) = [Ô]texto 05[Ô]
Dim objWriter As New System.IO.StreamWriter(ARQUIVO, True)
For i = 0 To 4
objWriter.WriteLine(aryText(i))
Next
objWriter.Close()
MsgBox([Ô]Arquivo Criado com Sucesso![Ô])
------------ FIM DO CÓDIGO -------------
Eu quero Criar o arquivo acima no caminho da pasta informada pelo [Ô]TextBox[Ô]
alguém pode mim ajudar ??
Tem um tutorial explicando como salvar arquivos no vb.net
http://www.macoratti.net/vbn_txt.htm
http://www.macoratti.net/vbn_txt.htm
eu ja vi esse tutu chapa... e não ensina o que eu quero saber.
seria algo tipo assim...
Dim ARQUIVO As String = [Ô]teste.txt[Ô] [ô] salvar esse arquivo no caminho abaixo
Dim CAMINHO As String = Me.TextBox.Text [ô] usuário vai informa o caminho aki
Se ligou ? ja procurei na net e não achei como se faz ta osso viu =(
Dim ARQUIVO As String = [Ô]teste.txt[Ô] [ô] salvar esse arquivo no caminho abaixo
Dim CAMINHO As String = Me.TextBox.Text [ô] usuário vai informa o caminho aki
Se ligou ? ja procurei na net e não achei como se faz ta osso viu =(
Tenta o codigo abaixo, aqui deu certo, no txtcaminho vc coloca por exemplo: C:\ que ele vai gravar no disco C
Dim ARQUIVO As String = [Ô]teste.txt[Ô]
Dim CAMINHO As String
Dim i As Integer
Dim aryText(4) As String
aryText(0) = [Ô]texto 01[Ô]
aryText(1) = [Ô]texto 02[Ô]
aryText(2) = [Ô]texto 03[Ô]
aryText(3) = [Ô]texto 04[Ô]
aryText(4) = [Ô]texto 05[Ô]
CAMINHO = TXTCAMINHO.Text & ARQUIVO
ARQUIVO = CAMINHO
Dim objWriter As New System.IO.StreamWriter(ARQUIVO, True)
For i = 0 To 4
objWriter.WriteLine(aryText(i))
Next
objWriter.Close()
MsgBox([Ô]Arquivo Criado com Sucesso![Ô])
Tópico encerrado , respostas não são mais permitidas