Visual Basic.NET - Resources text

Buenos días

Una pregunta, tengo el código de abajo que funciona y lo que quiero es que en lugar de leer el fichero txt del disco duro “C:” lo lea de “resources”.

Nota: el fichero txt está en resources a través de propiedades de la aplicación.

Muchas gracias.



Dim lista As New List(Of String)

Dim fila As DataRow

Dim tabla As New DataTable

'obtengo los datos del fichero.

Dim fic As New IO.StreamReader("C:\Users\jlmes\OneDrive\Desktop\CEEIM\ASMEIX.txt")

Dim linea As String = Nothing

linea = fic.ReadLine()

While (linea <> Nothing)

lista.Add(linea)

linea = fic.ReadLine()

End While


' Añado las columnas a la tabla antes

For col As Integer = 0 To lista(0).Split(";").Length - 1

tabla.Columns.Add(col.ToString())

Next

'Creo el array para meter los campos.

Dim Datos() As String

For i As Integer = 0 To lista.Count - 1

Datos = lista(i).Split(";")

fila = tabla.NewRow()

For j As Integer = 0 To Datos.Length - 1

fila(j) = Datos(j)

Next

tabla.Rows.Add(fila)

Next

' La asigno a mi tabla.

Me.DataGridView1.DataSource = tabla

Hola,

Cuando creas un recurso, das lo un nombre y un valor.
En tus códigos, cuando quieres obtener el valor del recurso, es suficiente de dar su nombre.
Mira la imagen siguiente, veras como tomar el valor del recurso.

Espero que este te ayudará ...

Muchísimas gracias.

Lo que quiero es que abra el fichero txt, lea Linea a línea y lo meta en el datagridview. Esto ya lo hace el código. Lo único que me falta es que lea el fichero txt desde recursos y no desde “C:”.

Muchísimas gracias.

Lo que quiero es que abra el fichero txt, lea Linea a línea y lo meta en el datagridview. Esto ya lo hace el código. Lo único que me falta es que lea el fichero txt desde recursos y no desde “C:”.


Adjunto fichero txt para mas aclaracion.

• ASMEIX.rar(18,4 KB)

Dices " ...Lo único que me falta es que lea el fichero txt desde recursos y no desde “C:”...

Para este detalle, he te dado la solucion : escribe el nombre del fichero en los recursos y escribe el nombre del recurso en tu codigo :

Dim fic As New IO.StreamReader(My.Resources.NOMBRE_DEL_RECURSO).

Si no quieres escribir la ruta del fichero, debes poner este fichero la misma carpeta que el fichero EXE de tu programa (este es Debug mientras el desarrollo).

Veo que este fichero TXT contiene una estructura CSV. Haré un ejemplo para llenar el DataGridView pronto, en la tarde, Ahora, debo partir ...

Hasta luego ...

Mil gracias

Ya he podo trabajar ...

La primera línea del fichero contiene los nombres de las columnas pero estos nombres están demasiados grandes, no es bien para mostrar (mira la primera imagen).

Para decir el nombre del fichero, he escrito el necesario en un function DigaMeCualFichero(). Este es el lugar donde haces el necesario. En mi proyecto, he puesto el fichero en la carpeta Debug y no utilizo los recursos (mira la segunda imagen).

El trato de los datos es hecho en el evento del botón : BCargar_Click(... ).

Adjunto mi proyecto (CSV_DGV_ES) de prueba.

...

• CSV_DGV_ES.zip(828,7 KB)

Mil gracias.

De verdad.

Mi teléfono es +34657413820.

Hola,

No pienso que el teléfono es útil. No puedo hablar y oir en español. Tengo malas orejas y a veces, no comprendo bien este es dicho en francés que es mi lengua materna.

Espero que ma solución con el fichero te gusta.

Buenas tardes...

Buenas,

La ultima pregunta,

Cuando publique el programa y lo envie a otro ordenador.....el fichero txt se cargará igualemnte en el Datagridview, no?

Gracias de nuevo.

Este es posible o no según la manera de hacer el paquete de la instalación. Si instale con el método Copiar-Pegar, este es fácil de poner el fichero con el EXE.
Si quieres, puedes enviar mi un paquete que instalaré en mi PC para probar.
También puedes probar en otro PC a la casa.
Si no funciona, miraré como hacer simple con este fichero.
Diga me ...
Buenas noches...