Página 1 de 1
Filtrar datos de un fichero.txt desde VB
Publicado: Lun Jun 14, 2004 5:41 pm
por Invitado
Hola, necesito urgente
q alquien me diga como puedo leer un fichero en formato .txt desde VB y a continuacion filtrar los datos que desee e introducirlos en otro archivo... la idea principal es crear un fichero secuencial a partir de unos datos que provienen de un fichero.txt
Muchas gracias por adelantado
Publicado: Lun Jun 14, 2004 6:21 pm
por ABCdatos
Si los saltos de línea están realizados con <CR><LF>, puedes hacer algo tipo:
Código: Seleccionar todo
Dim NúmeroArchivoEntrada as Byte
Dim NúmeroArchivoSalida as Byte
Dim Línea As String
NúmeroArchivoEntrada=FreeFile
Open "Archivo.txt" For Input As #NúmeroArchivoEntrada
NúmeroArchivoSalida=FreeFile
Open "Filtrado.txt" For Output As #NúmeroArchivoSalida
' Leemos el archivo de entrada línea a línea hasta el final.
While Not (EOF(NúmeroArchivoEntrada))
Line Input #NúmeroArchivoEntrada, Línea
' Aquí las condiciones del filtrado, si fuera una función "PasaFiltro".
If PasaFiltro(Línea) then
' Si cumple las condiciones, la escribimos en el archivo de salida.
Print #NúmeroArchivoSalida, Línea
End if
Wend
Close #NúmeroArchivoSalida
Close #NúmeroArchivoEntrada
Saludos.
y con un fichero enlace de entrada?
Publicado: Mar Jun 29, 2004 11:44 am
por Invitado
Muchas gracias por la información... si lo tuviera que enlazar con un fichero de enlace de entrada... tambien tendria que colocar el tipo de registro y la colocación exactamente como esta en el fichero??
Muxas gracias!!