salvar como archivo csv

HMG en Español

Moderator: Rathinagiri

Post Reply
rmtarget
Posts: 67
Joined: Sat Jul 04, 2009 7:28 pm

salvar como archivo csv

Post by rmtarget »

Hola amigos: pasé una dbf a una hoja de excel y hasta ahi no tengo problemas, pero quiero salvar los datos que grabe como un archivo con extensión .csv he probado con los siguientes dos codigos:

oSheet:SaveAs("C:\temporal\cuentas.csv")
oExcel:ACTIVEWORKBOOK:SAVEAS( "C:\temporal\cuentas.CSV" )

y al parecer los salva bien, pero al tratar de abrirlos con excel me dice:

"The file format an extension of 'cuentas.csv' don't match".....do you want to open it anyway ?"

de cualquier forma lo abro y se ven bien los datos pero al quere subirlo a otro sistema no lo reconoce como un archivo de formato csv

Como le hago para salvarlo correctamente como un file 'csv' ?

De antemano muchas gracias y saludos cordiales !
De antemano muchas gracias y saludos !!
Atte.
Rene Mtz. (méxico city)
User avatar
andyglezl
Posts: 1461
Joined: Fri Oct 26, 2012 7:58 pm
Location: Guadalajara Jalisco, MX
Contact:

Re: salvar como archivo csv

Post by andyglezl »

Hola Rene

No me queda claro porque "triangular" con Excel ?
Puedes guardar tu .dbf delimitado con:
----------------------------------------------------------------------
Hello rene

It is not clear to me why "triangulate" with Excel ?
You can save your delimited .dbf with:

COPY [FIELDS <idField list>] TO <xcFile>
[<scope>] [WHILE <lCondition>] [FOR <lCondition>]
[SDF | DELIMITED [WITH BLANK | <xcDelimiter>] |
Andrés González López
Desde Guadalajara, Jalisco. México.
Tiger
Posts: 70
Joined: Mon Aug 31, 2015 11:28 am
Location: Taipei

Re: salvar como archivo csv

Post by Tiger »

Or
Using follow code :
#define xlCSV 6 // CSV

oSheet:SaveAs("C:\temporal\cuentas.csv", xlCSV)
oExcel:ACTIVEWORKBOOK:SAVEAS( "C:\temporal\cuentas.CSV", xlCSV )
User avatar
koke
Posts: 116
Joined: Wed Aug 21, 2013 3:54 pm
DBs Used: DBF, mySql, mariaDB

Re: salvar como archivo csv

Post by koke »

Es más rápido si lo escribes directamente, sobre todo si son muchos registros
----------------------------------------------------------------
It’s faster if you write it directly, especially if there are many records.

Code: Select all

nombrearch := main.text_1.Value + "/" + main.text_2.Value + ".csv"
If (nManejalog := FCREATE(nombrearch,FC_NORMAL)) == -1
			? "No se puede crear el fichero:", FERROR()
				return
		Else
		FWRITE(nManejalog,'"' + 'RECNO' + '","' + 'PERIODO' + CRLF)
		For i:=1 to dblastrecno
			FWRITE(nManejalog,'"' + alltrim(str(db->(recno()))) + '","' +; alltrim(db->nombre) + '"' + CRLF)
		Next
		FCLOSE(nManejalog)
,___,
[O.o]
/)__)
-”–”-
KoKe
rmtarget
Posts: 67
Joined: Sat Jul 04, 2009 7:28 pm

Re: salvar como archivo csv

Post by rmtarget »

Muchas gracias Andyglezl, Koke y Tiger ! problema resuelto.
De antemano muchas gracias y saludos !!
Atte.
Rene Mtz. (méxico city)
Post Reply