Backup desde VB 6.0 a MySQL

[ecerpa]

Compañeros mios de este foro tan querido...
Tengo un problemilla, estoy trabajando en una aplicacion en VB 6.0 con MySQL y ahora tengo que crear el modulo de Backup (para generar una copia de seguridad de la BD) pero aun no me logro orientar nisiquiera en cuales son los comandos VB y SQL a ocupar, he estado investigando y no es mucha la informacion que he podido juntar...

Ojala me puedan ayudar

La idea es poder generar un archivo (.txt o bien .sql) que contenga el script de la Base de Datos y los datos contenidos en ella. Todo en Visual Basic 6.0

Agradezco de antemano la ayuda que me puedan brindar...

Saludos

Ecerpa.-

[cleptomano]

Escribí el síguete código y funciono espero que a ti también te resulte sin problemas

Private Sub Command1_Click()

Set comando1 = CreateObject("WSCript.shell")
comando1.run "cmd /K C: & CD MYSQL\BIN & mysqldump -u root -p password Base_de_datos_ > C:/RESPALKDO.sql "
Set comando1 = Nothing
End Sub

El comando mysqldump sirve para realizar copias de seguridad el código es sencillo de comprender no creo que se te complique mucho.

[ecerpa]

Gracias.....me sirvio como complemento para hacer lo que verdaderamente debo hacer....
vale amigazo

adios

[Jhonny412]

Hola Doctor soy nuevo en este foro... me gustaria que por favor me pudas dar una ayuda... en la ayuda a cerca del backup que te enviaron dices que esos codigos te funcionaron. Quisiera pedirte que me digas si tuviste que activar alguna referencia porque ami me salen errores.

Gracias de por anticipado por tu respuesta.

Gracias Doctor.

[donkanmcklaus]

bueno yo tambien solicito de su ayuda para este proposito, tengo una aplicacion en VB6.0 a la cual tengo que crearle un boton para respaldar la base de datos de mysql adicionalmente a la base de datos que queda tengo que borrarle todos los registros mas viejos de 6 meses, como podria hacerlo?

me gustaria hacerle un common dialog para que pregunte donde guardar esa base de datos

[donkanmcklaus]

ya logure que guardara la base de datos en un archivo .sql alguien sabe como puedo hacer para restaurarla???

he probado ya con mysql --user=usuario --password=password nombredelabasededatos < archivo a restaurar.sql

pero no me lo hace, lo peor es que tampoco me da errores!

si alguien me puede ayudar..

[jom1987]

alguien sabe donde queda guardado el respaldo con el codigo siguien
Private Sub Command1_Click()

que funcion tiene este codigo --->Set comando1 = CreateObject("WSCript.shell")
comando1.run "cmd /K C: & CD MYSQL\BIN & mysqldump -u root -p password Base_de_datos_ > C:/RESPALKDO.sql "
Set comando1 = Nothing
End Sub

o bien me pueden orientar como puedo hacer un respaldo de mi base de datos con mysql con visaul al parecer este codigo no se como lo puedo meter a visual

ademas tanbienquiero saber como puedo tener acceso a la base de datos desde la aplicacion de red con visual
ya especifiq la ruta donde debe estar guardad pero no veo nuingun archivo
c:user/documento/RESPALKDO.sql <-----esta es la direccion pero no lo guarda asi q no q hacer

[David]

Hola, jom1987. Bienvenido al foro.

Cuando tengas una duda, es mejor crear un tema nuevo en lugar de revivir un tema antiguo.

Y en cuanto a tu pregunta, se guarda en C:\RESPALKDO.sql

[jom1987]

alguien me puede decir como puedo hacer un respaldo con mysql y visual basic 6.0
es q este codigo no me dice donde queda guardado mi respaldo del archivo

[David]

Es que debes especificar en el código dónde se va a guardar, como te expliqué en el mensaje anterior .

[jdjesusc]

Iniciado por cleptomano

Escribí el síguete código y funciono espero que a ti también te resulte sin problemas

Private Sub Command1_Click()

Set comando1 = CreateObject("WSCript.shell")
comando1.run "cmd /K C: & CD MYSQL\BIN & mysqldump -u root -p password Base_de_datos_ > C:/RESPALKDO.sql "
Set comando1 = Nothing
End Sub

El comando mysqldump sirve para realizar copias de seguridad el código es sencillo de comprender no creo que se te complique mucho.

[jdjesusc]

Muy bueno gracias, me quitaste un tremendo problema con el tiempo, ya que tenia varias horas investigando y probando. Gracias.

[Shizuka]

Hola yo tengo duda con eso por que a mi me sale error :C si me crea la carpeta de RESPALKDO pero no hay nada adentro, qué puedo hacer? este es el código:

la bd se llama colegio2, y solo abre una terminan de ms-dos pero me sale error igual

Código vb:

Private Sub Command1_Click()
 
Set comando1 = CreateObject("WSCript.shell")
comando1.run "cmd /K C: & CD MYSQL\BIN & mysqldump -u root -p password colegio2 > C:/RESPALKDO.sql "
Set comando1 = Nothing
End Sub
 

[markos_medina]

Iniciado por ecerpa

Gracias.....me sirvio como complemento para hacer lo que verdaderamente debo hacer....
vale amigazo

adios

Hola amigos buen dia!
Es correcto la opcion que da nuestro cuate cleptomano pero hay que modificar algunos datos:
Suponiendo que su base de datos es del servicio "Wamp", entonces abrimos visual basic 6 insertamos un CommandButton (Command1) y ponemos:

Option Explicit
Dim comando1 As Variant

Private Sub Command1_Click()

Set comando1 = CreateObject("WSCript.shell")

comando1.run "cmd /K C: & CD.. & CD.. & CD.. & CD wamp\bin\mysql\mysql5.1.36\bin & mysqldump -u root reg_pacientes > c:\respaldoKBD.sql"

Set comando1 = Nothing

End Sub

- en lugar de reg_pacientes deben poner el nombre de su base de datos que van a respaldar
- No hay que agregar ninguna referencia por parte de VB6.0
- Doy por hecho que los usuarios de este sitio tienen conocimientos medios de VB6.0