|
| Iniciado por g.laib, 09,oct. 2020 11:49 - No hay respuesta |
| |
| | | |
|
| |
| Publicado el 09,octubre 2020 - 11:49 |
Je suis a la recherche d'un code qui va bien pour pour utiliser 2 répertoires de donnés exemple:
\Exe\Base de données production
\Exe\Base de données test
Le 1er exemple il y a des données que je ne voudrais pas utiliser et dans le 2ème cas, ce sont des donnés sans importance.
Je voudrais que l'utilisateur "Admin" utilise la second cas, et les autres utilisateurs le cas 1er cas.
j'ai essayer avec Hsubrep, les fichiers sont créés dans l'exe et non dans mes répertoires suivant utilisateurs du logiciel.
voici mon code :
gsChemin est un chaîne
SI fFichierExiste(fRepExe()+"\Fichier.ini")=Faux ALORS
SI PAS Ouvre(FEN_CheminIni) ALORS
FinProgramme()
FIN
FIN
gsChemin=INILit("Parametre", "Chemin", "", fRepDonnées() + "\Fichier.INI")
SI ErreurDétectée() ALORS
Erreur()
FIN
SI PAS HFerme("*") ALORS
Erreur("Problème lors de la fermeture des fichiers de données")
FIN
HSubstRep("?",gsChemin)
HCréationSiInexistant("*")
SI Login.NomUtilisateur=0 ALORS
Login.NomUtilisateur="Admin"
Login.MotDePasse="gla"
Login.Role="Administrateur"
HAjoute(Login)
SINON
FIN
cordialement.
gérard |
| |
| |
| | | |
|
| | | | |
| | |
|