RE:AYUDAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
Hola Cristian:
Una de las formas es con la la instrucción Open .. For Input y Open .. For Output
Ej: (leer)
Dim Linea as string
Open "a:\archivo.txt" For Input As #1 'Abre el archivo de modo lectura
Do Until EOF(1) 'un ciclo hasta el fin de archivo
Line Input #1, Linea 'Lee un registro del archivo -
Codigo = Mid(Linea, 1, 8) 'Extrae 8 caracteres
Loop
Close #1 'cierra el archivo
S u e r t e ! ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!