FoxPro/Visual FoxPro - ayuda con Txt

 
Vista:

ayuda con Txt

Publicado por Juan Carlos Lopez (30 intervenciones) el 19/06/2007 18:32:10
Hola amigos que tal, a ver mi echan una mano con esto. Tengo una tabla con 1.5 millon de mails e intento pasarlo al bloc de notas, ninguna me resulta; en la primera me da error ya que Yo quiero que no contenga espacios en balnco al final de cada registro. La segunda llega a cierto numero de registro y como que ya no soporta mas lineas el Txt.
Alguien sabe la mejor manera de hacerlo.

1._
SELECT MAILENVIO
COPY TO &ai_ame SDF FIELDS alltrim(mail)

2._
SELECT MAILENVIO
go top
STORE -1 TO L
SET PRINTER TO mail.txt
SET DEVI TO PRINT
@ 0,0 SAY ''
SCAN
L = L + 1
@ L,0 SAY ALLTRIM(mail)
ENDSCAN
SET PRINT TO
SET DEVICE TO SCREE

Espero me ayuden, 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:ayuda con Txt

Publicado por Plinio (7841 intervenciones) el 20/06/2007 12:25:56
Por si acaso el archivo resultante pasa de 2 gb?
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

RE:ayuda con Txt

Publicado por Juan Carlos Lopez (30 intervenciones) el 20/06/2007 16:16:43
Hola Plinio:
Gracias por responder, Mira el archivo llega a pesar 95,825 Kb, pero al correr este codigo me tira el siguiente error: LAS COORDENADAS NO SON VALIDAS, le doy suspender y veo el contador de lineas L q es igual a 2,185 osea como que ya es el tope que llega a enumerar lo que no entiendo porque.

SELECT MAILENVIO
go top
STORE -1 TO L
SET PRINTER TO mail.txt
SET DEVI TO PRINT
@ 0,0 SAY ''
SCAN
L = L + 1
@ L,0 SAY ALLTRIM(mail)
ENDSCAN
SET PRINT TO
SET DEVICE TO SCREE

Si hubiera algo mas que agregar bienvenido sea.
Saludos.
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