Sauvegarde et restauration :
1. Création dun repertoire de travail pour la sauvgarde et la restauration :
Dans le lecteur disque C: de votre ordinateur créez un repertoire sous le nom Data.
2. Utiliser l’utilitaire d’oracle «Oracle Sqldeveloper » pour executer les commandes suivantes :
Create or replace DIRECTORY Data_exp as 'C:\Data';
Grant read , write ON DIRECTORY Data_exp TO PUBLIC;
Ces deux commandes utilisent pour créer un alias vers le répertoire de travail crée d’avance.
Ici notre alias est nommé : Data_exp
Equivalent au chemin : 'C:\Data'.
3. Création des fichiers batch d’import et export :
Fichers batch d’export :
Dans le répertoire de travail 'C:\Data' créer ubn fichier texte nommée Exp_Full, faire ouvrir se fichier et ecrire dans ce
fichier les ligne de commandes qui permet d’exporter la base de données suivantes :
Expdp admin/admin dumpfile=Data_exp:Export_FULL.dmp logfile=Data_exp:Export_FULL.log full=y rows=n
Exit
Enregistrer et fermer le fichier. Ensuite renommer l’extension du fichier Exp_Full.txt avec l’extension Exp_Full.bat
Dans le répertoire de travail 'C:\Data' créer ubn fichier texte nommée Exp_Table, faire ouvrir se fichier et ecrire dans
ce fichier les ligne de commandes qui permet d’exporter la base de données suivantes :
Expdp admin/admin dumpfile=Data_exp:Export_tables.dmp logfile=Data_exp:Export_tables.log tables=table1,table2,…..
Exit
Enregistrer et fermer le fichier. Ensuite renommer l’extension du fichier Exp_Table.txt avec l’extension Exp_Table.bat
Dans le répertoire de travail 'C:\Data' créer ubn fichier texte nommée Exp_Utilisateur, faire ouvrir se fichier et ecrire
dans ce fichier les ligne de commandes qui permet d’exporter la base de données suivantes :
Expdp admin/admin dumpfile=Data_exp:Export_schema.dmp logfile=Data_exp:Export_schema.log owner=admin
Exit
Enregistrer et fermer le fichier. Ensuite renommer l’extension du fichier Exp_Utilisateur.txt avec l’extension
Exp_Utilisateur.bat
Fichers batch d’import :
Dans le répertoire de travail 'C:\Data' créer ubn fichier texte nommée Imp_Full, faire ouvrir se fichier et ecrire dans
ce fichier les ligne de commandes qui permet d’exporter la base de données suivantes :
Impdp admin/admin dumpfile=Data_exp:Export_FULL.dmp logfile=Data_exp:Export_FULL.log full=y rows=n
Exit
Enregistrer et fermer le fichier. Ensuite renommer l’extension du fichier Imp_Full.txt avec l’extension Imp_Full.bat
Dans le répertoire de travail 'C:\Data' créer ubn fichier texte nommée Imp_Table, faire ouvrir se fichier et ecrire dans
ce fichier les ligne de commandes qui permet d’exporter la base de données suivantes :
Impdp admin/admin dumpfile=Data_exp:Export_tables.dmp logfile=Data_exp:Export_tables.log tables=table1,table2,…..
Exit
Enregistrer et fermer le fichier. Ensuite renommer l’extension du fichier Imp_Table.txt avec l’extension Imp_Table.bat
Dans le répertoire de travail 'C:\Data' créer ubn fichier texte nommée Imp_Utilisateur, faire ouvrir se fichier et ecrire
dans ce fichier les ligne de commandes qui permet d’exporter la base de données suivantes :
Impdp admin/admin dumpfile=Data_exp:Export_schema.dmp logfile=Data_exp:Export_schema.log owner=admin
Exit
Enregistrer et fermer le fichier. Ensuite renommer l’extension du fichier Imp_Utilisateur.txt avec l’extension
Imp_Utilisateur.bat
Partie Delphi :
1. Création de l’interface :
Créer avec Delphi l’interface suivante :
2. Implémentation du code source :
Dans l’unité de la forme de sauvegarde et restauration ajouter dans la partie uses l’unité nommé : Shellapi
Bouton exporter :
if [Link] then
begin
ShellExecute(0,'OPEN','C:\Data\Exp_Full.bat', Nil, Nil,SW_HIDE);
ShowMessage('Sauvegarde complet éfféctué avec succès');
end;
if [Link] then
begin
ShellExecute(0,'OPEN','C:\Data\Exp_Table.bat', Nil, Nil,SW_HIDE);
ShowMessage('Sauvegarde des tables éfféctué avec succès');
end;
if [Link] then
begin
ShellExecute(0,'OPEN','C:\Data\Exp_Utilisateur.bat', Nil, Nil,SW_HIDE);
ShowMessage('Sauvegarde de schéma éfféctué avec succès');
end;
Bouton importer :
if [Link] then
begin
ShellExecute(0,'OPEN','C:\Data\Imp_Full.bat', Nil, Nil,SW_HIDE);
ShowMessage('Restauration complète éfféctué avec succès');
end;
if [Link] then
begin
ShellExecute(0,'OPEN','C:\Data\Imp_Table.bat', Nil, Nil,SW_HIDE);
ShowMessage('Restauration des tables éfféctué avec succès');
end;
if [Link] then
begin
ShellExecute(0,'OPEN','C:\Data\Imp_Utilisateur.bat', Nil, Nil,SW_HIDE);
ShowMessage('Restauration du schéma éfféctué avec succès');
end;