Exportar a DBF desde MySQL

[acuellar]

Distinguidos

Se puede exportar una tabla de MySQL a una DBF?
si es así

Como se hace?

Gracias por la ayuda

Saludos,

Adhemar

[jrestojeda]

Hola,
Obviamente se puede, pero hay algunas cosas a tener en cuenta.
Las DBFs soportan menos tipos de datos que las tablas MySql. (Antes debes analizar bien ese tema)
Segundo es ver como lo deseas hacer...
Si lo necesitas hacer desde el sistema una opción en hacer:

Select * from Tabla y luego recorrer ese query e ir haciendo los APPEND correspondientes a la DBF.

Si lo quieres hacer por afuera puedes usar cualquier herramienta que exporte datos a csv o similares y utilizar el excel para convertilos a DBF.
Espero te sirva la idea, pero como te aclaré antes, no olvides que DBF soporta menos tipos de datos que MySql.

Saludos,

[Daniel Garcia-Gil]

Saludos

Si usas TDolphin, esta incluye una clase para exportar a TEXT, DBF, EXCEL, WORD, HTML Y SQL, bastante fácil, revisa los ejemplos testexp* de la carpeta samples

[acuellar]

Gracias Esteban

Claro que recorriendo el Query se puede,
Revisando los PRG de la LIB de TDolphin hay una clase TDolphinToDbf

Si alguien tiene un Ej.

Saludos,

Adhemar

[acuellar]

Gracias Daniel

Al mismo tiempo enviamos el POST.

Revisaré.

Saludos,

Adhemar

[jrestojeda]

Saludos

Si usas TDolphin, esta incluye una clase para exportar a TEXT, DBF, EXCEL, WORD, HTML Y SQL, bastante fácil, revisa los ejemplos testexp* de la carpeta samples

Hola Daniel...
¿Y cómo haces con los tipos de datos que las DBFs no soportan?

[acuellar]

Daniel

He utilizado éste ejemplo

Code: Select all  Expand view

FUNCTION Main()
 
   LOCAL oServer, oQry
   LOCAL oExp, cTime,EXP_DBF
 
   D_SetCaseSensitive( .T. )
   
   IF ( oServer := ConnectTo() ) == NIL
      RETURN NIL
   ENDIF
   cls
   oQry = oServer:Query( "SELECT * FROM planidet" )
   
   oExp = oQry:Export( EXP_DBF, "d:\sistemas\planidet.dbf" )
   oExp:bOnStart = { || QOut( "Started..."), QOut( ""), cTime := Time() }
   oExp:bOnRow = {| o, n | ShowLine( n, oQry:LastRec() ) }
   oExp:bOnEnd = { || QOut( "Elapse time: " + ElapTime( cTime, Time() ) ), QOut( "Finished...") }
   
   oExp:Start()
   ?
   
RETURN NIL


PROCEDURE ShowLine( n, nTotal )

@ Row(),1 say Str( n / nTotal * 100 ) + "%"

RETURN
 

me daba error en EXP_DBF, la declaré en LOCAL oExp, cTime,EXP_DBF,
Crea la base DBF pero no se puede ver.

Porfa una ayudita.

Gracias,

Saludos,

Adhemar

[cnavarro]

Mira en Tdolphin.ch, no es una variable local

Code: Select all  Expand view

//export
#define EXP_TEXT     1
#define EXP_EXCEL    2
#define EXP_DBF      3
#define EXP_HTML     4
#define EXP_WORD     5
#define EXP_SQL      6

 

[Daniel Garcia-Gil]

Mira en Tdolphin.ch, no es una variable local

Code: Select all  Expand view

//export
#define EXP_TEXT     1
#define EXP_EXCEL    2
#define EXP_DBF      3
#define EXP_HTML     4
#define EXP_WORD     5
#define EXP_SQL      6

 

+1 exacto

[Daniel Garcia-Gil]

Saludos

Si usas TDolphin, esta incluye una clase para exportar a TEXT, DBF, EXCEL, WORD, HTML Y SQL, bastante fácil, revisa los ejemplos testexp* de la carpeta samples

Hola Daniel...
¿Y cómo haces con los tipos de datos que las DBFs no soportan?

Se hace una conversion, igual todo el codigo fuente esta disponible, por si hay algo que se me escapo

[acuellar]

Gracias amigos

me faltaba poner: #include "tdolphin.ch"

Funciona perfecto.

Saludos,

Adhemar