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