leer archivo txt

[Mcruzmx]

hola he estado buscando y no encuentro información.

bueno, tengo un form, tengo 1 cuadro de texto, necesito que el cuadro de texto tome el valor (osea que diga en el cuadro de texto) lo que tenga de contenido el archivo x.txt

como puedo hacerlo?

tengo vb6


gracias

[culd]

Código:

Dim CanalLibre As Integer

CanalLibre = FreeFile
Open rutaARCHIVOtxt For Input As #Canal
        Line Input #Canal, Text1.Text
Close #Canal

[Avellaneda]

Iniciado por culd

Código:

Dim CanalLibre As Integer

CanalLibre = FreeFile
Open rutaARCHIVOtxt For Input As #Canal
        Line Input #Canal, Text1.Text
Close #Canal

Bueno, ese código daría error ya que no se puede asignar directamente el valor a un control, debe ser a través de una variable. Aún así solamente leería la primera línea del archivo.

Otro método:

Open "c:\NombreArchivo.txt" For Input As #1
Text1.Text = Input(LOF(1), #1)
Close #1