Añadir a fichero
Publicado por Daniel O. (2 intervenciones) el 13/05/2006 15:21:15
Hola, me gustaria añadir en un fichero todos los elementos q tengo en un listbox. hice esto:
Dim ruta As String
ruta = "C:\inicio.cfg"
On Error Resume Next
Open ruta For Output As #1
For i = 0 To lstNombre.ListCount
Print #1, lstNombre.Text + " "
Next
Close #1
Asi me añade el mismo elemento, tantas veces como elementos hay. como seria para q me escribiera todos??
gracias
Dim ruta As String
ruta = "C:\inicio.cfg"
On Error Resume Next
Open ruta For Output As #1
For i = 0 To lstNombre.ListCount
Print #1, lstNombre.Text + " "
Next
Close #1
Asi me añade el mismo elemento, tantas veces como elementos hay. como seria para q me escribiera todos??
gracias
Valora esta pregunta
0