Share via


Cómo: Leer archivos de texto existentes en Mis documentos (Visual Basic)

Actualización: noviembre 2007

El ejemplo de código siguiente lee el contenido de los archivos de texto de la carpeta Mis documentos y lo escribe en un único archivo.

Ejemplo

Dim filePaths As System.Collections.ObjectModel.ReadOnlyCollection(Of String)
Dim allText As String
Try
   filePaths = My.Computer.FileSystem.GetFiles _
   (My.Computer.FileSystem.SpecialDirectories.MyDocuments)
   For Each file As String In filePaths
      allText = My.Computer.FileSystem.ReadAllText(file)
      My.Computer.FileSystem.WriteAllText("bigfile.txt", allText, True)
   Next
Catch fileException As Exception
   Throw fileException
End Try

Compilar el código

Reemplace "bigfile.txt" con el nombre del archivo en el que desea escribir.

Programación eficaz

Los archivos que se leen deben ser archivos de texto.

Puede utilizar OpenFileDialog (Componente, formularios Windows Forms) y SaveFileDialog (Componente, formularios Windows Forms) para reducir la probabilidad de errores en tiempo de ejecución relacionados con los permisos.

No tome ninguna decisión sobre el contenido del archivo basándose en su nombre. Por ejemplo, es posible que el archivo Form1.vb no sea un archivo de código fuente Visual Basic.

Compruebe todas las entradas antes de utilizar los datos en la aplicación. Puede que el contenido del archivo no sea el esperado y que los métodos que leen el archivo produzcan un error.

Seguridad

Para leer un archivo, el ensamblado requiere un nivel de privilegios concedido por la clase FileIOPermission. Si realiza una ejecución en un contexto de confianza parcial, el código podría desencadenar una excepción por falta de privilegios. Para obtener más información, vea Conceptos básicos sobre la seguridad de acceso a código. El usuario también necesita acceso al archivo. Para obtener más información, vea Listas de control de acceso (ACL).

Vea también

Referencia

My.Computer.FileSystem.SpecialDirectories (Objeto)

My.Computer.FileSystem.ReadAllText (Método)

My.Computer.FileSystem.WriteAllText (Método)

OpenFileDialog

SaveFileDialog