Generar Copia de seguridad de base MYSQL desde visual Foxpro

2,377 views
Skip to first unread message

Diacrisa

unread,
May 24, 2013, 3:14:59 PM5/24/13
to publice...@googlegroups.com
Hola tengo una aplicación desarrollada en VFP 9 pero la base de datos es en MYSQL me gustaria saber como hago desde VFP la copia de la base de datos, la base esta en innoDB.
Agradezco la colaboarcion. Gracias 

Mauricio R. Molinero

unread,
May 24, 2013, 3:24:09 PM5/24/13
to publice...@googlegroups.com
Buscando en este grupo esta la respuesta, temas ya tratados.

lcEx = '"C:\Archivos de programa\mysql\MySQL Server 5.5\bin\mysqldump.exe" "-uroot" "-p123456" "MyDB" "-rc:\test.sql"'
oShell = createobject("WScript.Shell")
oShell.Run(lcEx,0,.t.)

Saludos!

Mauricio R. Molinero,

Alfonso Ramirez Diaz

unread,
May 24, 2013, 5:51:21 PM5/24/13
to publice...@googlegroups.com
También las puedes respaldar en DBF si no tienes acceso directo al servidor o el servidor esta en Linux.

*****
* Hbackup
* Respaldar Tablas SQL en DBF
*****
FUNCTION HBackup
IF !DIRECTORY(u_database)
MKDIR (u_database)
ENDIF
SET DEFAULT TO (u_database)
CREATE DATABASE (u_database)
OPEN DATABASE (u_database)
SQLEXEC(lnHandle,"SHOW TABLES","Tablas")
SELECT Tablas
lcCampo = FIELD(1)
SCAN
lcTabla = ALLTRIM(&lcCampo)
WAIT WINDOW "RESPALDANDO "+UPPER(lcTabla) NOWAIT
SQLEXEC(lnHandle,"SELECT * FROM "+lcTabla,"campos")
SELECT Campos
IF RECCOUNT("campos")>0
COPY TO &lcTabla DATABASE (u_database)
ENDIF
USE IN Campos
SELECT Tablas
ENDSCAN
USE IN Tablas
SET DEFAUL TO ..
CLOSE TABLES ALL
CLOSE DATABASES ALL
ATENCION("RESPALDO FINALIZADO OK...")
ENDFUNC

Luis Leon

unread,
May 28, 2013, 10:23:54 AM5/28/13
to foro vfp
Estimado Mauricio , hace mucho tiempo estaba buscando esto, gracias, y dime como seria la sentencia para restaurar esta informacion
 

Date: Fri, 24 May 2013 12:24:09 -0700
From: pip...@gmail.com
To: publice...@googlegroups.com
Subject: [vfp] Re: Generar Copia de seguridad de base MYSQL desde visual Foxpro

Mauricio R. Molinero

unread,
May 28, 2013, 10:33:01 AM5/28/13
to publice...@googlegroups.com, leon-...@hotmail.com
Un poquito de Google..

mysql.exe --verbose --user=XXXXXXXX --password=XXXXXXXX DB_NAME < /PATH/TO/DUMPFILE.SQL

Saludos!

Mauricio R. Molinero,

Luis Leon

unread,
May 28, 2013, 11:09:45 AM5/28/13
to foro vfp
Amigo, Disculpa tienes un ejemplo
 
Gracias
 

Date: Tue, 28 May 2013 07:33:01 -0700
From: pip...@gmail.com
To: publice...@googlegroups.com
CC: leon-...@hotmail.com
Subject: Re: [vfp] Re: Generar Copia de seguridad de base MYSQL desde visual Foxpro

Luis Leon

unread,
May 30, 2013, 2:01:48 PM5/30/13
to foro vfp
Estimado :
 
he podido realizar el backup sin ningun problema, pero al momento de restaurar la copia no lo hace, he realizado pruebas desde el DOS y si las restaura , solamente desde mi form no lo hace
 
el codigo que utilizo es el sgte :
 
FileNam1 = "PLANWIN201305303036.SQL"
Mi_Copia = "D:\COPIAS\PLANWIN"
FileUnion = Mi_Copia+'\'+FileNam1
DbBase = 'SULLANA'

Mi_CrutaMysq = 'D:\MYSQL SERVER 6.0\BIN\MYSQL.EXE'
lcEx = '"&Mi_CrutaMysq" "-uroot" "-psullana" "&DbBase" < "&FileUnion"'


oShell =
createobject("WScript.Shell")
oShell.
Run(lcEx,0,.t.)
 
haber en que puedo estar fallando
 
Gracias
 

 

From: leon-...@hotmail.com
To: publice...@googlegroups.com
Subject: RE: [vfp] Re: Generar Copia de seguridad de base MYSQL desde visual Foxpro
Date: Tue, 28 May 2013 10:09:45 -0500

Ivan

unread,
May 31, 2013, 2:16:44 PM5/31/13
to publice...@googlegroups.com, leon-...@hotmail.com
Si no recuerdo mal, no se pueden usar redirecciones en WScript.Shell.Run.

Deberás crear un BAT, por ejemplo, y llamarlo con %COMPSPEC% /C RESTAURA.BAT

Americo Aguilar

unread,
Oct 16, 2013, 1:28:17 PM10/16/13
to publice...@googlegroups.com
Si necesitas tengo un aplicativo desarrollado en VFP 8 donde colocas los datos basicos de la BD y te genera las copias necesarias, me avisas a mi correo software...@gmail.com
Message has been deleted

Fernando D. Bozzo

unread,
Oct 16, 2013, 1:32:43 PM10/16/13
to publice...@googlegroups.com, leon-...@hotmail.com
Américo, esto es de hace 5 meses.... ¿no te muestra la fecha el browser?


El miércoles, 16 de octubre de 2013 19:30:01 UTC+2, Americo Aguilar escribió:
Si deseas te paso la aplicacion que desarrolle en VFP 8 para hacer estas copias de seguridad, me avisas al correo.

ZeRoberto

unread,
Oct 16, 2013, 1:34:02 PM10/16/13
to publicesvfoxpro
Y de milagro no se contesto el mismo.

Fernando D. Bozzo

unread,
Oct 16, 2013, 1:37:45 PM10/16/13
to publice...@googlegroups.com

pupo

unread,
Oct 16, 2013, 2:38:56 PM10/16/13
to publice...@googlegroups.com

Pudiera enviarme ese còdigo a  mi correo que trabajo con Postgres y empiezo ahora, Saludos y Gracias

sisant...@gmail.com

unread,
Oct 16, 2013, 2:52:44 PM10/16/13
to publice...@googlegroups.com
El siguiente es un .BAT para windows y ejecutarlo como tarea


@echo off
title Creando BackUp base de datos MySQL

color 0a
set us=root
set pa=xxxxxxxx
set db1=base1
set db2=base2

FOR /F "tokens=1,2,3 delims=/ " %%i IN ('date /T') do (set DIA=%%k%%j%%i)
FOR /F "tokens=1,2 delims=: " %%n IN ('time /T') do (set HORA=%%n%%o) 

MD %dia%_%hora%

CD C:\Program Files\MySQL\MySQL Server 5.1\bin\

@echo on

mysqldump -u %us% -p%pa% %db1% > "d:\BackupMySQL\%dia%_%hora%\%db1%_%dia%_%hora%.sql"

mysqldump -u %us% -p%pa% %db2% > "d:\BackupMySQL\%dia%_%hora%\%db2%_%dia%_%hora%.sql"

Saludos.

Sergio Santacruz

Americo Aguilar

unread,
Oct 16, 2013, 4:07:16 PM10/16/13
to publice...@googlegroups.com
Disculpame genio, lo tendre en cuenta para la proxima.


El 16 de octubre de 2013 12:32, Fernando D. Bozzo <fdb...@gmail.com> escribió:

Americo Aguilar

unread,
Oct 16, 2013, 4:07:41 PM10/16/13
to publice...@googlegroups.com
de puro milagro.

mpulla

unread,
Oct 16, 2013, 5:34:46 PM10/16/13
to publice...@googlegroups.com
jajaja.

No te enojes, hay algunos foxeros que no perdona...

Saludos.
Mauricio

Fer

unread,
Oct 18, 2013, 1:33:47 AM10/18/13
to publice...@googlegroups.com

Héctor, es un post de mayo!
:-)

Hector Colman

unread,
Oct 17, 2013, 9:55:19 PM10/17/13
to publice...@googlegroups.com
HOLA Diacrisa
por buscar total una solución a este tema una vez me decidí hacer mi propia aplicación para realizar copia de seguridad

hcolma...@gmail.com enviame tu corre y te envio la aplicacion
Saludo...


El viernes, 24 de mayo de 2013 15:14:59 UTC-4, Diacrisa escribió:

Brishman pozo pariona

unread,
Aug 29, 2017, 5:07:30 PM8/29/17
to Comunidad de Visual Foxpro en Español
hola hector podrias enviarme la aplicacion porfavor a mi correo brish...@gmail.com

Jean Pierre Adonis De La Cruz Garcia

unread,
Aug 29, 2017, 5:32:21 PM8/29/17
to Comunidad de Visual Foxpro en Español
AAAAAAAAAAAAAAAAsu, ese post se envio hace casi 4 años, y recien e estan pidiendo, jejeje.
abra qe esperar unos 3 años mas para que le respondan de serl el caso.

Rodolfo Ortiz González

unread,
Aug 29, 2017, 6:09:47 PM8/29/17
to publice...@googlegroups.com

Pues si responde me apunto, jajajajaja salu2!

Hector Colman

unread,
Aug 29, 2017, 8:16:40 PM8/29/17
to publice...@googlegroups.com
Hola ya envié

El 29 de agosto de 2017, 18:09, Rodolfo Ortiz González <rodolfo...@gmail.com> escribió:

Pues si responde me apunto, jajajajaja salu2!


El 29 de agosto de 2017, 16:32, Jean Pierre Adonis De La Cruz Garcia <elconsultorinformatico@gmail.com> escribió:
AAAAAAAAAAAAAAAAsu, ese post se envio hace casi 4 años, y recien e estan pidiendo, jejeje.
abra qe esperar unos 3 años mas para que le respondan de serl el caso.


El martes, 29 de agosto de 2017, 16:07:30 (UTC-5), Brishman pozo pariona escribió:
hola hector podrias enviarme la aplicacion porfavor a mi correo brish...@gmail.com

El jueves, 17 de octubre de 2013, 20:55:19 (UTC-5), Hector Colman escribió:
HOLA Diacrisa
por buscar total una solución a este tema una vez me decidí hacer mi propia aplicación para realizar copia de seguridad

hcolma...@gmail.com enviame tu corre y te envio la aplicacion
Saludo...

El viernes, 24 de mayo de 2013 15:14:59 UTC-4, Diacrisa escribió:
Hola tengo una aplicación desarrollada en VFP 9 pero la base de datos es en MYSQL me gustaria saber como hago desde VFP la copia de la base de datos, la base esta en innoDB.
Agradezco la colaboarcion. Gracias 




--
Org@ware Organización mediante hardware y software

GETIANG

unread,
Aug 29, 2017, 10:50:38 PM8/29/17
to Comunidad de Visual Foxpro en Español
Si eres tan amable de enviarmelo tambien, te lo agradecería mucho

getia...@gmail.com

Gracias de antemano

Marcelo Barberis

unread,
Aug 29, 2017, 10:58:32 PM8/29/17
to publicesvfoxpro
hace un tiempo atras hice unos pjx de seguridad de datos con respaldos en mysql y dbf, les paso mis tres pjx para los respaldos, uno es para mysql otro es para dbf usando winrar para la compresion y otro es un pjx de mi amigo jun tangunan

--
Marcelo Barberis Gutierrez
Sistemas Informaticos
Villa Montes - Bolivia
Telef.: +591-76830544

Rodolfo Ortiz González

unread,
Aug 29, 2017, 11:09:34 PM8/29/17
to publice...@googlegroups.com
Hola Héctor.

No me llegó, podrás enviarlo nuevamente pfv?

Saludos!

Armando Rodríguez B.

unread,
Aug 30, 2017, 9:19:23 AM8/30/17
to publice...@googlegroups.com

Marcelo buen día. Intenté descargarlo y una página me lleva a otra, y la otra a otra y así, sucesivamente, jeje. Podrías de favor enviarlo como adjunto ?

Saludos y gracias

Armando

Armando Rodríguez B.

unread,
Aug 30, 2017, 9:27:21 AM8/30/17
to Comunidad de Visual Foxpro en Español

Antonio Meza

unread,
Aug 30, 2017, 11:31:32 AM8/30/17
to Comunidad de Visual Foxpro en Español
Hector!!! si lo pones aquí en el foro seria espectacular!!!

saludos
Antonio Meza

Carlos Alfaro

unread,
Aug 30, 2017, 9:32:11 PM8/30/17
to publice...@googlegroups.com

En esa pagina viendo el script, encontré este link:

 

http://download1523.mediafireuserdownload.com/egux7qgmiurg/jlzjgz2v85sa0ja/PROY+RESPALDOS.rar

 

Allí es en donde se puede bajar.

 

Buen día.

 

 

Carlos Alfaro

Marcelo Barberis

unread,
Aug 30, 2017, 10:42:49 PM8/30/17
to publicesvfoxpro
hola que raro porque no tendria que ser asi, mira te paso una img de lo que me sale ami usando el link que te pase, ahi esta la img y tu debes hacer click en el boton verde que aparece en la parte derecha solo eso nada mas y te comienza a descargar.
img.jpg

Carlos Alfaro

unread,
Aug 30, 2017, 11:27:54 PM8/30/17
to publice...@googlegroups.com

Si así se ve, pero con solo hacer clic abre otra página en lugar de llevarte al link que les pasé.

 

From: publice...@googlegroups.com [mailto:publice...@googlegroups.com] On Behalf Of Marcelo Barberis
Sent: miércoles, 30 de agosto de 2017 08:43 p.m.
To: publicesvfoxpro
Subject: Re: [vfp] Re: Generar Copia de seguridad de base MYSQL desde visual Foxpro

 

hola que raro porque no tendria que ser asi, mira te paso una img de lo que me sale ami usando el link que te pase, ahi esta la img y tu debes hacer click en el boton verde que aparece en la parte derecha solo eso nada mas y te comienza a descargar.

 

El 30 de agosto de 2017, 21:32, 'Carlos Alfaro' via Comunidad de Visual Foxpro en Español <publice...@googlegroups.com> escribió:

En esa pagina viendo el script, encontré este link:

 

http://download1523.mediafireuserdownload.com/egux7qgmiurg/jlzjgz2v85sa0ja/PROY+RESPALDOS.rar

 

Allí es en donde se puede bajar.

 

Buen día.

 

 

Carlos Alfaro

 

Hector Colman

unread,
Aug 31, 2017, 7:16:31 AM8/31/17
to publice...@googlegroups.com

Rodolfo Ortiz González

unread,
Aug 31, 2017, 9:08:41 AM8/31/17
to publice...@googlegroups.com

Gcas Héctor, logré bajarlo, un saludo!


El 31 de agosto de 2017, 6:16, Hector Colman <hcolma...@gmail.com> escribió:

Armando Rodríguez B.

unread,
Aug 31, 2017, 9:17:27 AM8/31/17
to publice...@googlegroups.com

Gracias Compañeros.

Armando Rodríguez B.

unread,
Aug 31, 2017, 9:22:12 AM8/31/17
to publice...@googlegroups.com

Gracias.

Reply all
Reply to author
Forward
0 new messages