Manipulando Arquivos e Diretórios No Visual Basic
Manipulando Arquivos e Diretórios No Visual Basic
Manipulando Arquivos e Diretórios No Visual Basic
VB
If FolderBrowserDialog1.ShowDialog() = DialogResult.OK Then
' List files in the folder.
ListFiles(FolderBrowserDialog1.SelectedPath)
End If
VB
3. Private Sub ListFiles(ByVal folderPath As String)
filesListBox.Items.Clear()
' Obtain the file path from the list box selection.
Dim filePath = filesListBox.SelectedItem.ToString
' Verify that the file was not removed since the
' Browse button was clicked.
If My.Computer.FileSystem.FileExists(filePath) = False Then
MessageBox.Show("File Not Found: " & filePath)
Exit Sub
End If
O código verifica se um item está selecionado na ListBox. Então, ele obtém a entrada de caminho
do arquivo da ListBox. O método FileExists é usado para verificar se o arquivo ainda existe.
VB
3. Private Function GetTextForOutput(ByVal filePath As String) As String
' Verify that the file exists.
If My.Computer.FileSystem.FileExists(filePath) = False Then
Throw New Exception("File Not Found: " & filePath)
End If
Return sb.ToString
End Function
4. Execute o aplicativo. Clique em Procurar e navegue até uma pasta que contenha os
arquivos .txt. Clique em OK.
Selecione um arquivo na ListBox e, em seguida, clique em Examinar. Uma
MessageBox mostra as informações do arquivo.
VB
1. If saveCheckBox.Checked = True Then
' Place the log file in the same folder as the examined file.
Dim logFolder As String =
My.Computer.FileSystem.GetFileInfo(filePath).DirectoryName
Dim logFilePath = My.Computer.FileSystem.CombinePath(logFolder,
"log.txt")
O código define o caminho do arquivo de log, a fim de colocar o arquivo de log no mesmo
diretório que o arquivo selecionado. O texto da entrada de log é definido com a data e hora
atuais, seguido pelas informações do arquivo.
O método WriteAllText, com o argumento append definido como True, é usado para criar
a entrada de log.
2. Execute o aplicativo. Navegue até um arquivo de texto, selecione-o na ListBox, escolha a
caixa de seleção Salvar Resultados e, em seguida, clique em Examinar. Verifique se a
entrada de log foi gravada para o arquivo log.txt.
Esse código define o diretório padrão do navegador de pastas para o diretório atual.
3. Execute o aplicativo. Quando você clica em Procurar pela primeira vez, a caixa de diálogo
Procurar Pasta é aberta no diretório atual.
4. Interromper a execução do aplicativo.
VB
1. Private Sub SetEnabled()
Dim anySelected As Boolean =
(filesListBox.SelectedItem IsNot Nothing)
examineButton.Enabled = anySelected
saveCheckBox.Enabled = anySelected
End Sub
SetEnabled()
End Sub
' Obtain the file path from the list box selection.
Dim filePath = filesListBox.SelectedItem.ToString
' Verify that the file was not removed since the
' Browse button was clicked.
If My.Computer.FileSystem.FileExists(filePath) = False Then
MessageBox.Show("File Not Found: " & filePath)
Exit Sub
End If
Return sb.ToString
End Function
examineButton.Enabled = anySelected
saveCheckBox.Enabled = anySelected
End Sub
VB
' This example uses classes from the System.IO namespace.
SetEnabled()
End Sub
' Obtain the file path from the list box selection.
Dim filePath = filesListBox.SelectedItem.ToString
' Verify that the file was not removed since the
' Browse button was clicked.
If System.IO.File.Exists(filePath) = False Then
MessageBox.Show("File Not Found: " & filePath)
Exit Sub
End If
Return sb.ToString
End Function
examineButton.Enabled = anySelected
saveCheckBox.Enabled = anySelected
End Sub
FileSystem.CurrentDirectory Property
Definição
Namespace:
Microsoft.VisualBasic.FileIO
Assembly:
Microsoft.VisualBasic.dll
Valor da propriedade
String
O diretório atual para operações de E/S de arquivo.
Exceções
DirectoryNotFoundException
O caminho não é válido.
UnauthorizedAccessException
O usuário não tem as permissões necessárias.
Exemplos
Este exemplo retorna o diretório atual e o exibe em uma caixa de mensagem.
VB
MsgBox(My.Computer.FileSystem.CurrentDirectory)
VB
My.Computer.FileSystem.CurrentDirectory = "C:\TestDirectory"
Comentários
CurrentDirectory é uma variável de ambiente de todo o sistema.
Segurança
FileIOPermission
Controla a capacidade de acessar arquivos e pastas. Enumeração associada: Unrestricted.
ileSystem Class
Definição
Namespace:
Microsoft.VisualBasic.FileIO
Assembly:
Microsoft.VisualBasic.dll
Herança
Object
FileSystem
Exemplos
Este exemplo verifica para determinar se a pasta C:\backup\logs existe e verifica suas
propriedades.
VB
Dim logInfo As System.IO.DirectoryInfo
If My.Computer.FileSystem.DirectoryExists("C:\backup\logs") Then
logInfo = My.Computer.FileSystem.GetDirectoryInfo(
"C:\backup\logs")
End If
Comentários
A tabela a seguir lista exemplos de tarefas que envolvem o My.Computer.FileSystem objeto.
Para Consulte
Ler de um arquivo de texto Como ler em arquivos de texto
Como ler a partir de arquivos de texto separados
Ler um arquivo de texto delimitado
por vírgulas
Como ler a partir de arquivos de texto de largura
Ler um arquivo de texto de largura fixa
fixa
Como ler a partir de arquivos de texto com vários
Ler um arquivo de texto com vários formatos
formatos
Ler de um arquivo binário Como ler a partir de arquivos binários
Ler um arquivo de texto com um Como ler texto a partir de arquivos com um
StreamReader StreamReader
Gravar em um arquivo de texto Como gravar texto em arquivos
Anexar a um arquivo de texto Como anexar a arquivos de texto
Gravar em um arquivo binário Como gravar em arquivos binários
Gravar em arquivos de texto na Como gravar texto em arquivos no diretório Meus
MyDocuments diretório Documentos
Gravar em um arquivo de texto com um Como gravar texto em arquivos com um
StreamWriter StreamWriter
Como copiar arquivos com um padrão específico
Copiar arquivos com um padrão específico
para um diretório
Copiar um arquivo no mesmo diretório Como criar uma cópia de um arquivo no mesmo
Para Consulte
diretório
Como criar uma cópia de um arquivo em um
Copiar um arquivo para um diretório diferente
diretório diferente
Crie um arquivo Como criar um arquivo
Excluir um arquivo Como excluir um arquivo
Localizar arquivos com um padrão específico Como localizar arquivos com um padrão específico
Mover um arquivo Como mover um arquivo
Renomear um arquivo Como renomear um arquivo
Copiar um diretório para outro diretório Como copiar um diretório para outro diretório
Criar um diretório Como criar um diretório
Localizar subdiretórios com um padrão Como localizar subdiretórios com um padrão
específico específico
Obtenha a coleção de arquivos em um
Como obter a coleção de arquivos em um diretório
diretório
Como recuperar o conteúdo do diretório Meus
Ler a partir de MyDocuments diretório
Documentos
Analisar um caminho de arquivo Como analisar demarcadores de arquivo
Construtores
Inicializa uma nova instância da classe FileSystem.
FileSystem()
Propriedades
Obtém ou define o diretório atual.
CurrentDirectory
Retorna uma coleção somente leitura de todos os nomes de unidade disponíveis.
Drives
Métodos
Combina dois caminhos e retorna um caminho formatado
CombinePath(String, String) corretamente.
SpecialDirectories Class
Definição
Namespace:
Microsoft.VisualBasic.FileIO
Assembly:
Microsoft.VisualBasic.dll
Fornece propriedades para acessar diretórios comumente referenciados.
C#
public class SpecialDirectories
Herança
Object
SpecialDirectories
Exemplos
Este exemplo retorna o filePath para o usuário do diretório da área de trabalho e o exibe.
VB
Dim filePath As String
filePath = My.Computer.FileSystem.SpecialDirectories.Desktop
MsgBox(filePath)
Comentários
Se o caminho para o diretório referenciado estiver vazio, geralmente devido ao sistema operacional
não suportar o diretório, um DirectoryNotFoundException exceção é lançada.
Nenhuma barra invertida (\) aparece no final do caminho.
A tabela a seguir lista exemplos de tarefas que envolvem o
My.Computer.FileSystem.SpecialDirectories objeto.
Para Consulte
Ler do diretório Meus documentos Como recuperar o conteúdo do diretório Meus Documentos
Construtores
Retorna uma instância da classe SpecialDirectories.
SpecialDirectories()
Propriedades
AllUsersApplicationData Obtém um nome de caminho apontando para o diretório Dados de
Aplicativos para todos os usuários.
Métodos
Determina se o objeto especificado é igual ao objeto atual.
Equals(Object)
(Inherited from Object)
Serve como a função de hash padrão.
GetHashCode()
(Inherited from Object)
Obtém o Type da instância atual.
GetType()
(Inherited from Object)
Cria uma cópia superficial do Object atual.
MemberwiseClone()
(Inherited from Object)
Retorna uma cadeia de caracteres que representa o objeto atual.
ToString()
(Inherited from Object)