Como guardar a txt lo escrito en un combo

Iniciado por casaviella, 28 Diciembre 2005, 01:06 AM

0 Miembros y 1 Visitante están viendo este tema.

casaviella

Hola buenas noches. pues tenia una duda que es la siguiente: quiero guardar el contenido de un combobox en un txt pero sin remplazar lo que pongo y que cuando vuelva a iniciar me lea ese txt y me lo meta al combobox. Lo intente pero me sobre escribia la linea anterior.

Muchas gracias de antemano. :rolleyes: ;D

kakinets

Hola si entedi lo que tu pusiste el codigo seria el sig.


On Error GoTo falta
Open "C:\ejemplo.txt" For Append As #1
Print #1, Combo1.list
Close #1

casaviella

Gracias pedronets eso me sirve pero tambien queria como leer ese archivo y que me lo introduzca al ComboBox en forma de lista.

Gracias de antemano y feliz año nuevo

maxnet


dim IntCanal as integer , strBuffer as string
intcanal=freefile
open DirArchivo for input as #intcanal
do while not eof(intcanal)
  lineinput #intcanal strBuffer
  if len(strbuffer) > 0 then
    combo1.additem strbuffer
end if
doevents
loop
close #intcanal



con este codigo lees linea a linea el archivo y lo cargas en el
combo



casaviella

Muchas gracias maxnet y pedronets por aberme ayudado