Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
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()Carregando comentários...