Comment creer un fichier d`alias ?
//Variables
sRepertoireFichier est une chaîne = ComplèteRep(fRepExe())
CNX_HF_Classique est une Connexion
// Paramètres de la connexion HF Classique
CNX_HF_Classique..Provider = hAccèsHF7
// Ouverture de la connexion
SI PAS HOuvreConnexion(CNX_HF_Classique) ALORS Erreur(HErreurInfo())
// Creation des alias
SI PAS HAlias(Categorie, Categorie_Local) ALORS Erreur(HErreurInfo())
// Assignation du fichier logique avec le fichier physique
SI PAS HChangeNom(Categorie_Local, "Categorie") ALORS Erreur(HErreurInfo())
//Affectation du repertoire
SI PAS HChangeRep(Categorie_Local, sRepertoireFichier) ALORS Erreur(HErreurInfo())
//Affectation de la connexion
SI PAS HChangeConnexion(Categorie_Local,CNX_HF_Classique) ALORS Erreur(HErreurInfo())
//Creation des fichiers d`alias
SI PAS HCreationSiInexistant(Categorie_Local) ALORS Erreur(HErreurInfo())