Generacion de un archivo TXT
-
- Ayudante de Santa
- Mensajes: 98
- Registrado: Lun Oct 15, 2012 5:22 pm
- Contactar:
Generacion de un archivo TXT
Buen dia, necesito crear un archivo txt en clarion. Alguien me puede ayudar?
Saludos
Saludos
"En los momentos de crisis, sólo la imaginación es más importante que el conocimiento."
Albert Einstein
Jorge Climis
Albert Einstein
Jorge Climis
-
- Novato
- Mensajes: 13
- Registrado: Vie May 27, 2011 8:23 am
- Contactar:
Re: Generacion de un archivo TXT
Hola
Te creas en el dct una tabla con el driver ascii (text) y con una columna de la longitud que necesites.
Luego en la app lo creas con CREATE(ruta y nombre de tu archivo txt) y vas grabando con Access:ruta y nombre de tu archivo txt.Insert()
Salu2
Te creas en el dct una tabla con el driver ascii (text) y con una columna de la longitud que necesites.
Luego en la app lo creas con CREATE(ruta y nombre de tu archivo txt) y vas grabando con Access:ruta y nombre de tu archivo txt.Insert()
Salu2
-
- Ayudante de Santa
- Mensajes: 98
- Registrado: Lun Oct 15, 2012 5:22 pm
- Contactar:
Re: Generacion de un archivo TXT
Muchas gracias por el aporte...lo voy a probar y despues les cuento.
saludos
saludos
"En los momentos de crisis, sólo la imaginación es más importante que el conocimiento."
Albert Einstein
Jorge Climis
Albert Einstein
Jorge Climis
-
- Ayudante de Santa
- Mensajes: 98
- Registrado: Lun Oct 15, 2012 5:22 pm
- Contactar:
Re: Generacion de un archivo TXT
Buen dia,
Lo probe y me funcionó gracias. Pero tengo un problemita mas . Necesito generar un archivo de acuerdo a un periodo en particular.
Por ejemplo: para un mes en particular SICORE_2013_2.txt .
En fullpathName del driver seteo una variable global que inicializo en el inicio del programa con 'c:\sicore.txt'
luego en el fomulario hago lo siguiente en un boton genererarchivo:
StrSQL='SELECT * FROM '&clip(glo:base_primaria)&'SICORE_AUX_export'
aux_sql{prop:sql} = clip(StrSQL)
loop until access:aux_sql.next()
AUX6:campo1 = clip(AUX5:Campo1)
add(aux_txt_sicore)
end
Tampoco puedo inicialiar el archivo asociado: sicore.txt.
Saludos
Lo probe y me funcionó gracias. Pero tengo un problemita mas . Necesito generar un archivo de acuerdo a un periodo en particular.
Por ejemplo: para un mes en particular SICORE_2013_2.txt .
En fullpathName del driver seteo una variable global que inicializo en el inicio del programa con 'c:\sicore.txt'
luego en el fomulario hago lo siguiente en un boton genererarchivo:
StrSQL='SELECT * FROM '&clip(glo:base_primaria)&'SICORE_AUX_export'
aux_sql{prop:sql} = clip(StrSQL)
loop until access:aux_sql.next()
AUX6:campo1 = clip(AUX5:Campo1)
add(aux_txt_sicore)
end
Tampoco puedo inicialiar el archivo asociado: sicore.txt.
Saludos
"En los momentos de crisis, sólo la imaginación es más importante que el conocimiento."
Albert Einstein
Jorge Climis
Albert Einstein
Jorge Climis
- Mauricio
- Desarrollador de Clarion
- Mensajes: 1125
- Registrado: Dom Feb 06, 2011 9:34 am
- Ubicación: España
- Contactar:
Re: Generacion de un archivo TXT
No entiendo bien, qué es AUX6, a qué tabla corresponde? Y AUX5?
Mauricio, básicamente usando Clarion 6.3
www.tdcsoftware.com y www.clarioneros.com/blog
www.tdcsoftware.com y www.clarioneros.com/blog
-
- Ayudante de Santa
- Mensajes: 98
- Registrado: Lun Oct 15, 2012 5:22 pm
- Contactar:
Re: Generacion de un archivo TXT
buen dia,
AUX5 = es la tabla en donde la cargo con el SQL, AUX6 es la tabla txt en donde esta mapeado el archivo .txt.
AUX5 = es la tabla en donde la cargo con el SQL, AUX6 es la tabla txt en donde esta mapeado el archivo .txt.
"En los momentos de crisis, sólo la imaginación es más importante que el conocimiento."
Albert Einstein
Jorge Climis
Albert Einstein
Jorge Climis
- Mauricio
- Desarrollador de Clarion
- Mensajes: 1125
- Registrado: Dom Feb 06, 2011 9:34 am
- Ubicación: España
- Contactar:
Re: Generacion de un archivo TXT
Chequeaste qué error te da el Add?
Mauricio, básicamente usando Clarion 6.3
www.tdcsoftware.com y www.clarioneros.com/blog
www.tdcsoftware.com y www.clarioneros.com/blog
-
- Novato
- Mensajes: 13
- Registrado: Vie May 27, 2011 8:23 am
- Contactar:
Re: Generacion de un archivo TXT
Hola
Prueba con esto:
LOOP
NEXT(aux_sql)
IF ERRORCODE() THEN BREAK.
CLEAR(AUX6:Record)
AUX6:campo1 = clip(AUX5:Campo1)
Access:aux_txt_sicore.Insert()
END
Salu2
Prueba con esto:
LOOP
NEXT(aux_sql)
IF ERRORCODE() THEN BREAK.
CLEAR(AUX6:Record)
AUX6:campo1 = clip(AUX5:Campo1)
Access:aux_txt_sicore.Insert()
END
Salu2
¿Quién está conectado?
Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 14 invitados