domingo, marzo 26, 2023

Como escribir un archivo de texto con VB.NET

En algunos sistemas te solicitan exportar datos en formato de archivo de texto, ya sea para importar o exportar datos, enviar algún tipo de información por correo electrónico o hacer algún respaldo sencillo, en fin, sirve para muchas otras cosas más y aquí te explicamos como crearlo.

En este ejemplo obtenemos los datos de una función que nos retorna un dataset, luego lo leemos y utilizamos cada datarow para llenar el archivo línea por línea.

Debemos importar la librería Imports System.IO

    Private Sub GeneraArchivo()
        'Variables para abrir el archivo en modo de escritura
        Dim strStreamW As Stream
        Dim strStreamWriter As StreamWriter
        Try
            Dim ds As New DataSet

            Dim FilePath As String = "C:nombreArchivo.txt"

            'Se abre el archivo y si este no existe se crea
            strStreamW = File.OpenWrite(FilePath)
            strStreamWriter = New StreamWriter(strStreamW, System.Text.Encoding.UTF8)

            'Se traen los datos que necesitamos para el archivo
            'TraerDatosArchivo retorna un dataset pero perfectamente
            'podria ser cualquier otro tipo de objeto
            ds = Negocios.TraerDatosArchivo()

            Dim dr As DataRow
            Dim Nombre As String = ""
            Dim Apellido As String = ""
            Dim Email As String = ""

            For Each dr In ds.Tables(0).Rows
                'Obtenemos los datos del dataset
                Nombre = CStr(dr("Nombre"))
                Apellido = CStr(dr("Apellido"))
                Email = CStr(dr("Email"))

                'Escribimos la línea en el achivo de texto
                strStreamWriter.WriteLine(Nombre & " " & Apellido & " - " &; Email)
            Next

            strStreamWriter.Close()

            MsgBox("El archivo se generó con éxito")
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try
    End Sub

Roy Rojashttp://www.dotnetcr.com
Con más de 20 años de experiencia en programación, experto en lenguajes .NET, VB, C#, ASP.NET, Xamarin, XCode, DBA en SQL Server. Creador de dotnetcr.com, sitio web para programadores en español. royrojas.com | dotnetcr.com | GitHub

Redes Sociales

2,736FansMe gusta
326SeguidoresSeguir

Popular esta semana

Flutter – Error: ADB exited with exit code 1

En este artículo vamos a explorar algunas posibles causas y solución al error en Flutter Error: ADB exited with exit code 1....
SQL Server MERGE

MERGE en SQL Server para Insert, Delete y Update con dos tablas

Ejemplo práctico usando MERGE para sincronizar dos tablas, Insert, Update y Delete en un solo query. Válido para SQL SERVER 2008 o superior.
SQL Server

DELETE con subconsulta o INNER JOIN

En el siguiente ejemplo se explica la forma en que se pueden eliminar registros en nuestras tablas en SQL Server con instrucciones...

Últimos artículos

Como crear una API REST con ASP.NET Core 6.0

Crear una API REST con C# en ASP.NET es un proceso sencillo y rápido que permite exponer un conjunto de recursos a...
Machine Learning & Python

Introducción a Machine Learning en Python

Machine Learning es una rama de la inteligencia artificial que se enfoca en el desarrollo de sistemas que pueden aprender de...
SQL Server MERGE

MERGE en SQL Server, como utilizarlo de forma sencilla

El comando MERGE en SQL Server se utiliza para combinar datos de varias tablas en una sola tabla. Es útil para actualizar...

Índices repetidos en SQL Server ¿Cómo encontrarlos?

Los índices en la base de datos SQL Server es una herramienta que nos ayuda a mejorar la respuesta de nuestras consultas,...