elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: (TUTORIAL) Aprende a emular Sentinel Dongle By Yapis


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP) (Moderador: kub0x)
| | | |-+  [SOLUCIONADO] Guardar listbox en un txt
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: [SOLUCIONADO] Guardar listbox en un txt  (Leído 10,001 veces)
.:Dione:.

Desconectado Desconectado

Mensajes: 13



Ver Perfil
[SOLUCIONADO] Guardar listbox en un txt
« en: 10 Septiembre 2009, 14:07 pm »

OS cuento el problema, que será facil de resolver, pero no lo veo.
Tengo mi programa que hace una lista de las carpetas de un directorio y lo guarda en un listbox, hasta aquí todo bien, el problema llega cuando intento guardar el contenido del listbox en un txt.

Os pongo el código y el contenido del txt.
Código
  1.  
  2. Option Explicit On
  3.  
  4. Imports System.IO
  5. Public Class Form1
  6.  
  7.    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
  8.  
  9.    End Sub
  10.  
  11.    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
  12.        For Each archivos As String In Directory.GetDirectories("c:\", "*.*", SearchOption.TopDirectoryOnly)
  13.            ' extraer el nombre de la carpeta de la ruta completa  
  14.            archivos = archivos.Substring(archivos.LastIndexOf("\") + 1).ToString
  15.            ' Agregar el valor  
  16.            ListBox1.Items.Add("C:\" & archivos.ToString)
  17.  
  18.        Next
  19.  
  20.  
  21.  
  22.    End Sub
  23.  
  24.    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
  25.        Dim oSW As New StreamWriter("C:\archivo_prueba.txt")
  26.  
  27.        Dim Linea = ListBox1.Items.ToString
  28.        oSW.WriteLine(Linea)
  29.        oSW.Flush()
  30.  
  31.    End Sub
  32.  
  33.    Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
  34.  
  35.    End Sub
  36. End Class
  37.  

Contenido del txt.
Código
  1. System.Windows.Forms.ListBox+ObjectCollection

Espero que me podais ayudar.


« Última modificación: 11 Septiembre 2009, 00:09 am por Hadess_inf » En línea

Erik#


Desconectado Desconectado

Mensajes: 1.138


Gundam


Ver Perfil
Re: Guardar listbox en un txt
« Respuesta #1 en: 10 Septiembre 2009, 14:39 pm »

Esto es de C#, pero puede servirte: http://msdn.microsoft.com/es-es/library/8bh11f1k.aspx


En línea

Atrum

Desconectado Desconectado

Mensajes: 65



Ver Perfil WWW
Re: Guardar listbox en un txt
« Respuesta #2 en: 10 Septiembre 2009, 15:58 pm »

El problema esta aqui:

Código
  1. Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
  2.        Dim oSW As New StreamWriter("C:\archivo_prueba.txt")
  3.  
  4.        Dim Linea = ListBox1.Items.ToString  'El objeto ListBox1.Items es del tipo ListBoxObjectCollection y al convertirlo a cadena no obtienes el texto
  5.                                                         'ya que ListBox1.Items es un arreglo de items
  6.        oSW.WriteLine(Linea)
  7.        oSW.Flush()
  8.  
  9.    End Sub
  10.  

Cambialo por:

Código
  1. Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
  2.  
  3.        Dim oSW As New StreamWriter("C:\Users\dguatemala\archivo_prueba.txt")
  4.        Dim i As Integer
  5.        For i = 0 To ListBox1.Items.Count - 1
  6.            Dim Linea = ListBox1.Items(i).ToString() 'Asi obtienes cada elemento del arreglo y conviertes su valor a cadena
  7.            oSW.WriteLine(Linea)
  8.            oSW.Flush()
  9.        Next
  10.  
  11.  
  12.    End Sub
  13.  

Eso, en teoria, te deberia funcionar como quieres, espero te sirva
En línea

.:Dione:.

Desconectado Desconectado

Mensajes: 13



Ver Perfil
Re: Guardar listbox en un txt
« Respuesta #3 en: 10 Septiembre 2009, 23:53 pm »

Gracias, ese código ha funcionado perfectamente. Dentro de poco os volveré a molestar con mis preguntas jeje. Has pronto y muchas gracias.
En línea

Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
[Solucionado][C#] Seleccionar value de un ListBox con SelectMultiple
.NET (C#, VB.NET, ASP)
Shell Root 0 2,001 Último mensaje 19 Septiembre 2013, 06:49 am
por Shell Root
Error al guardar y abrir un txt en unos listbox
.NET (C#, VB.NET, ASP)
cael1011 1 2,135 Último mensaje 25 Septiembre 2016, 09:11 am
por Eleкtro
MOVIDO: Error al guardar y abrir un txt en unos listbox
Programación Visual Basic
Eleкtro 0 1,834 Último mensaje 25 Septiembre 2016, 09:06 am
por Eleкtro
Guardar contenido de listbox en settings
.NET (C#, VB.NET, ASP)
rigorvzla 2 2,587 Último mensaje 23 Septiembre 2018, 14:49 pm
por rigorvzla
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines