Power Builder - Como leer un archivo de texto

   
Vista:

Como leer un archivo de texto

Publicado por Felipe (3 intervenciones) el 05/01/2011 20:32:56
Estimados, soy una persona novata en este lenguaje y necesito leer un archivo de texto, el cual no está separado por comas, solo necesito leer de principio a fin las filas y obtener una información desde una posición X, desde, hasta y sacar el contenido y almacenarlo en una variable y así hasta que finalice el archivo.

Pero lamentablemente no se qué opciones usar, ni como capturar la información desde una fila, para guardar en una variable el valor requerido

De ante mano muchas gracias por su ayuda
Felipe
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Como leer un archivo de texto

Publicado por JeinnerH (638 intervenciones) el 11/01/2011 22:41:45
Mira este ejemplo:

integer li_FileNum, loops, i
long flen, bytes_read, new_pos
blob b, tot_b

// Set a wait cursor
SetPointer(HourGlass!)
// Get the file length, and open the file
flen=FileLength(sle_filename.Text)
li_FileNum = FileOpen(sle_filename.Text, StreamMode!, Read!, LockRead!)

// Determine how many times to call FileRead
IF flen > 32765 THEN
IF Mod(flen, 32765) = 0 THEN
loops = flen/32765
ELSE
loops = (flen/32765) + 1
END IF

ELSE
loops = 1
END IF

// Read the file
new_pos=1
FOR i = 1 to loops
bytes_read = FileRead(li_FileNum, b)
tot_b = tot_b + b
NEXT

FileClose(li_FileNum)
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar