Filtrar datos de un fichero.txt desde VB

Cuestiones y dudas acerca de lenguajes de programación diversos.

Moderador: Moderadores

Avatar de Usuario
Invitado

Filtrar datos de un fichero.txt desde VB

Mensaje por Invitado » Lun Jun 14, 2004 5:41 pm

Hola, necesito urgente :oops: 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 :roll:

Muchas gracias por adelantado :wink:

Avatar de Usuario
ABCdatos
Administrador foro
Mensajes: 673
Registrado: Dom Mar 03, 2002 1:00 am
Contactar:

Mensaje por ABCdatos » Lun Jun 14, 2004 6:21 pm

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.
Equipo ABCdatos.
http://www.abcdatos.com/

Avatar de Usuario
Invitado

y con un fichero enlace de entrada?

Mensaje por Invitado » Mar Jun 29, 2004 11:44 am

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!!

Responder