FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
como puedo restaurar un archivo .sql a una base de datos en mysql por delphi
Saludos a todos
como puedo restaurar un archivo .sql a una base de datos en mysql por delphi |
#2
|
|||
|
|||
Mira muchachita ya te explique como se hacia jijijijijiji
__________________
La vida es un simple pero complejo If J=rS
|
#3
|
||||
|
||||
Saludos!
Hay varias formas dependiendo de cómo te estés conectando a la base de datos, pero consistiría en cargar el archivo .sql y pasárselo a un componente descendiente de "TDataSet" que admita SQL (como TQuery, TSQLQuery, TADOQuery, etc.). Por ejemplo, si conectas a la base de datos mediante DBExpress y utilizaras TSQLQuery:
Chao! |
#4
|
|||
|
|||
Gracias por tu respuesta pero de esa manera no me funciona.
Lo que yo necesito es que comando puedo utilizar para enviar un respaldo de una base de datos d mysql que esta en un archivo .sql a otra base de datos tambien en sql. Ya yo hice el archivo .bat que contiene la sentencia para migrar la informacion el archivo .bat contiene lo siguiente: Código:
c:\mysql\bin\mysql bdsat2 < C:\RespaldoInicial.sql |
#5
|
||||
|
||||
Para ejecutar un .bat o cualquier proceso en Delphi puedes usar la función "WinExec" pero me parece que no te estoy entendiendo bien... Si lo que preguntas es que comando has de ejecutar para hacer backup o restaurar una base de datos MySQL visita la siguiente direccion: http://www.desarrolloweb.com/articul....php?manual=34
(En dicha Web te hablan del comando "mysqldump" para hacer backup y de como restaurar usando el comando "mysql", para ejecutar ambos comandos con sus parámetros desde Delphi tendras que usar la función "WinExec" o podrías probar también con "ShellExecute" o "CreateProcess") Última edición por jmariano fecha: 18-08-2005 a las 00:08:22. |
#6
|
|||
|
|||
Yo hize lo sig. para restaurar una BD SQL
Donde se manda llamar EjecutarPrograma nada mas es k pongas el comando para ejecutar querys en MySQL, pero creo que esto te puede servir. Si tienes alguna duda, pues lo comentas y veremos k se puede hacer Última edición por m@kio fecha: 18-08-2005 a las 00:56:00. |
#7
|
||||
|
||||
Hola amigos,
Tengo un problema amigo m@kio, me sale que no esta declarado el identificador PShellExecuteInfo y todos los demas que no los encuentra, la verdad no se que libreria añadir en el uses lo busque pero no lo encuentro, siempre tengo ese problema con algunos programas de los que no identifica los tipos y no se donde encontar a que librerias corresponden. No se sobre el api de windows supongo que es de ahi las funciones que utilizas, no entiendo casi nada sobre la funcion EjecutarPrograma, por favor si me pudieras dar una pequeña explicación si no es mucha molestia o decirme donde puedo encontrar información para entender tu programa. Muchas Gracias de por adelantado Que tengan buen dia amigos |
#8
|
|||
|
|||
Amigo Caro debes agregar ShellApi para que reconozca las funciones
|
#9
|
|||
|
|||
Con la ayuda de todos ustedes me funciono de esta manera:
Código:
procedure CrearArchivoBat(rutArchivo,Contenido: string); var temp: TStrings; begin temp := TStringList.Create; try temp.Add(Contenido); temp.SaveToFile(rutArchivo); finally temp.Free; end; end; procedure TForm_Menu.respaldarClick(Sender: TObject); begin CrearArchivoBat(ExtractFilePath(Application.ExeName)+'Respaldos_SAT\RespaldoBDSAT.bat', 'c:\mysql\bin\mysqldump -uroot -d bdsat > C:\Archiv~1\Klariu~2\SAT\Respaldo_BDSAT_Vacia.sql'); //Este procedimiento contiene la ruta donde se guardara el archivo.bat y el otro parametro es lo que va a contener el archivo.bat shellexecute(Handle, 'open','E:\Hidalis\proyecto SAT\Respaldos_SAT\RespaldoBDSAT.bat',nil,nil,SW_SHOWNORMAL); // winexec('E:\Hidalis\proyecto SAT\Respaldos_SAT\RespaldoBDSAT.bat',SW_SHOWNORMAL); el winexec tambien funciona como el shellexecute, lo coloque para supieran las dos formas de hacerlo. end; procedure TForm_Menu.restaurtarClick(Sender: TObject); begin CrearArchivoBat(ExtractFilePath(Application.ExeName)+'Respaldos_SAT\RestaurarBDSAT.bat','c:\mysql\bin\mysql bdsat2 < C:\Archiv~1\Klariu~2\SAT\Respaldo_BDSAT_Vacia.sql'); winexec('E:\Hidalis\proyecto SAT\Respaldos_SAT\RestaurarBDSAT.bat',SW_SHOWNORMAL); //EL COMANDO SHELLEXECUTE TAMBIEN FUNCIONA EN ESTA PARTE end; |
|
|
|