1. Este site usa cookies. Ao continuar a usar este site está a concordar com o nosso uso de cookies. Saber Mais.

Criar ficheiros txt e escrever texto neles

Discussão em 'Programação' iniciada por PC14, 15 de Janeiro de 2008. (Respostas: 3; Visualizações: 1810)

  1. Olá Pessoal!!

    Estou a tentar criar um txt e escrever nele. Para escolher o caminho, introduzi um 'savefiledialog' e consigo criar o ficheiro mas quando tento escrever aparece sempre um erro:
    The process cannot access the file 'C:\temp\1.txt' because it is being used by another process.

    o código é o seguinte:

    PrivateSub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
    Dim numFile AsInteger = FreeFile()
    IfMe.SaveFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
    IO.File.Create(Me.SaveFileDialog1.FileName().ToString)
    EndIf
    Microsoft.VisualBasic.FileOpen(numFile, Me.SaveFileDialog1.FileName().ToString, OpenMode.Output)
    PrintLine(numFile, "escrever alguma coisa")
    Microsoft.VisualBasic.FileClose(numFile)
    EndSub


    Não sei o que está mal. Alguem pode ajudar??

    Obrigado

    PC
     
  2. balute

    balute Power Member

    Isso tudo pode ser feito numa linha, e funciona bem:
    Código:
    If SaveFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then IO.File.WriteAllText(SaveFileDialog1.FileName, "escrever alguma coisa")
    Usar métodos do VB6 em .NET é uma má ideia.
     
  3. Kayvlim

    Kayvlim Undefined Moderator
    Staff Member

    Nem mais. É evitar usar o Microsoft.VisualBasic ao máximo. Ou se trabalha em .NET ou no 6, mas misturar nunca dá bom resultado.
     
  4. Funciona perfeitamente!

    E obrigado pelos conselhos. Ainda sou um principiante...;)

    PC
     

Partilhar esta Página