Ir para conteúdo

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Roberto Paes

.net listando arquivos de um diretório em uma listbox

Recommended Posts

Olá pessoas, estou desenvolvendo uma aplicação no visual basic que lista todos os arquivos em uma listbox, até aí tudo bem.. mas depois eu preciso fazer operações com esses arquivos, e o windows diz que estes arquivos estão sendo usados pela minha aplicação. Como resolvo isso?

segue o código:

   ListBox1.Items.Clear()

        files = dirinfo.GetFiles("*", IO.SearchOption.AllDirectories)

        For Each file In files
            ListBox1.Items.Add(file.FullName)
            

               Next

       
        Dim fluxoTexto As IO.StreamWriter
        Dim Arquivo As String = Application.StartupPath + "\teste.txt"
        Dim conta As String = -1

        fluxoTexto = New IO.StreamWriter(Arquivo)

        fluxoTexto.Write("[UPDATE]" & vbCrLf)
        fluxoTexto.Write("total=" & ListBox1.Items.Count & vbCrLf)


       


        For Each item As String In ListBox1.Items ' o erro começa aqui 
            conta = conta + 1
            crc = GetCRC32(item).ToString
            fluxoTexto.Write("[" & conta & "]" & vbCrLf)
            Dim arrItem() As String
            Dim strMensagem As String
            strMensagem = item
            arrItem = Split(strMensagem, "\update\")
            fluxoTexto.Write("caminho=" & arrItem(1) & vbCrLf)
            fluxoTexto.Write("crc32=" & crc & vbCrLf)

            infoReader = My.Computer.FileSystem.GetFileInfo(item)
            fluxoTexto.Write("len=" & infoReader.Length & vbCrLf)
  
            Exit For

    
        Next
        fluxoTexto.Close()


Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.