Lectura de datos en un archivo de texto
fonm699
14 de Mayo del 2008
Estoy trabajando en un programa para leer los datos de varios arcivos de texto e integrarlos en una base de datos
por ejemplo en un archivo tengo la siguiente informaci贸n
n煤mero: uno
nombre: mike
direcci贸n: 14
en otro arhivo tengo los siguientes datos
n煤mero: cinco
nombre: john
direcci贸n: 31
Para extraer los datos de la primera l铆nea uso la siguiente instrucci贸n
open rutaarchivo for binary as #1
Seek (1), 13
n煤mero = Input(5, #1)
donde n煤mero es el campo al cual es enviada la informaci贸n en un formulario de Access.
hasta aqui todo es correcto porque en el campo "nombre" todos los registros tienen el mismo n煤mero de car谩cteres ya que algunos estan rellenados con espacios.
El problema es que cuando quiero leer los campos "nombre y "direcci贸n" , los campos no estan rellenados con espacios y entonces ya no tienen el mismo n煤mero de caracteres.
La pregunta es que instrucciones pueden ayudarme para leer la informaci贸n contenida en los campos "nombre" y "direcci贸n"
Espero que puedan ayudarme gracias de antemano
por ejemplo en un archivo tengo la siguiente informaci贸n
n煤mero: uno
nombre: mike
direcci贸n: 14
en otro arhivo tengo los siguientes datos
n煤mero: cinco
nombre: john
direcci贸n: 31
Para extraer los datos de la primera l铆nea uso la siguiente instrucci贸n
open rutaarchivo for binary as #1
Seek (1), 13
n煤mero = Input(5, #1)
donde n煤mero es el campo al cual es enviada la informaci贸n en un formulario de Access.
hasta aqui todo es correcto porque en el campo "nombre" todos los registros tienen el mismo n煤mero de car谩cteres ya que algunos estan rellenados con espacios.
El problema es que cuando quiero leer los campos "nombre y "direcci贸n" , los campos no estan rellenados con espacios y entonces ya no tienen el mismo n煤mero de caracteres.
La pregunta es que instrucciones pueden ayudarme para leer la informaci贸n contenida en los campos "nombre" y "direcci贸n"
Espero que puedan ayudarme gracias de antemano
fonm699
14 de Mayo del 2008
Por si aguien le sirve ya encontre como leer los datos que necesito, tengo que usar la instrucci贸n
line input #1,linea
que me almacena una linea completa en la variable "linea" y despues la instrucci贸n
x=mid(linea,n煤mero inical de caracter, n煤mero de caracteres a leer)
para que me guarde la cadena que requiero en la variable x que despues puedo mandar al campo que requiera
line input #1,linea
que me almacena una linea completa en la variable "linea" y despues la instrucci贸n
x=mid(linea,n煤mero inical de caracter, n煤mero de caracteres a leer)
para que me guarde la cadena que requiero en la variable x que despues puedo mandar al campo que requiera