Réaliser la sauvegarde du contenu d'une base de données dans un serveur HFSQL
Se connecter au serveur :
// Paramètres de la connexion
DB_connexion..Provider = hAccèsHFClientServeur
DB_connexion..Utilisateur = sai_Utilisateur
DB_connexion..MotDePasse = sai_passe
DB_connexion..Serveur = sai_Serveur+":"+sai_Port
DB_connexion..Cryptage = hCryptageNon
SI HOuvreConnexion(DB_connexion) ALORS
AlimonterLaListedesBase()
Groupe_Sauvegarde..Etat=Actif
FIN
Récupérer la liste des base de données :
soit liste=HListeBaseDeDonnées(DB_connexion,hLstNormal)
ListeSupprimeTout(Combo_ListeDB)
POUR TOUTE CHAÎNE DB DE liste
ListeAjoute(Combo_ListeDB,DB+gLien(DB))
FIN
Sauvegarder une base de données :
QUAND EXCEPTION DANS
HSauvegarde(DB_connexion,Combo_ListeDB,sai_rep,Int_index,sai_description,Jauge1)
FAIRE
Lib_erreur=ErreurInfo(errRésumé)
FIN
0 commentaires:
Enregistrer un commentaire