GeneXus - Lectura de archivo plano

 
Vista:

Lectura de archivo plano

Publicado por Jessie (1 intervención) el 28/10/2005 14:16:36
Hola

Estoy programando en genexus 7.0 y necesito leer archivos planos. En esta version no existen comandos para ello. Por lo cual, necesito realizar esta lectura con comandos de visual basic y este es mi problema, no se cuales son estos comandos.

Gracias
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:Lectura de archivo plano

Publicado por Camilo (8 intervenciones) el 04/11/2005 22:39:50
Para Visual Basic:

VB myfile = [!archivo!]
VB Open myfile For Input Access Read As #1
VB Do While NOT EOF(1)
VB Line Input #1, linea
VB [!linea!]= linea

VB Loop
VB close #1

Donde [!&archivo!] y [!linea!] es una notación que debes usar en estas lineas para representar a la variable &archivo y &linea de Genexus

Para Visual Fox

DBASE myfile = [!archivo!]
DBASE puntero= fopen(myfile)
DBASE [!puntero!]= puntero

If &puntero = -1
Msg('No puedo abrir archivo de Tiendas :'+ Trim(&Archivo))
Return
EndIf

DBASE fseek(puntero, 0, 0)
DBASE Do While .NOT. feof(puntero)
DBASE Linea= fgets(puntero)
DBASE [!Linea!]= Linea
DBASE EndDo
DBASE fclose(puntero)

Espero que te sirva.

Suerte
Camilo.
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