salvar como archivo csv

HMG en Español

Moderator: Rathinagiri

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

salvar como archivo csv

Post by rmtarget » Wed Apr 18, 2018 10:08 pm

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: 965
Joined: Fri Oct 26, 2012 7:58 pm
Location: Guadalajara Jalisco, MX
Has thanked: 20 times
Been thanked: 40 times
Contact:

Post by andyglezl » Thu Apr 19, 2018 12:30 am

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: 34
Joined: Mon Aug 31, 2015 11:28 am
Location: Taipei
Has thanked: 2 times
Been thanked: 6 times

Post by Tiger » Thu Apr 19, 2018 3:39 am

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: 59
Joined: Wed Aug 21, 2013 3:54 pm
DBs Used: DBF, mySql, mariaDB
Has thanked: 12 times
Been thanked: 20 times

Post by koke » Thu Apr 19, 2018 12:32 pm

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: 54
Joined: Sat Jul 04, 2009 7:28 pm

Post by rmtarget » Thu Apr 19, 2018 12:38 pm

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

Post Reply