adresse dossier de l'exécutable

Bonjour,

J'aimerai connaitre l'adresse complète du dossier de l'exécutable dans lequel se trouve mon programme fortran une fois compilé.

Je vous explique, mon programme fortran doit écrire un fichier texte dans le même dossier que l'executable. Tout marche bien lorsque je ne spécifie pas de dossier mais dès que mon programme fortran est appelé depuis un autre programme, le fichier texte se créé ailleurs que dans le dossier du programe fortran.
Il doit être créé dans le repertoire courant je pense.
C'est pour cela que je veux forcer l'écriture dans le dossier de l'exe fortran.

Merci de votre aide.

Bonjour,

Une solution serait de fournir au programme (en argument par exemple) les nom et chemin complets du fichier texte à écrire. Puisque le deuxième programme sait où aller chercher son compère, il dispose sûrement déjà des informations nécessaires.

Une autre possibilité serait d'utiliser depuis le programme un

Citation:

---

call system(instruction)

---

Où "instruction" est une chaîne de caractères contenant un enchaînement de commandes (Unix? DOS? Tu n'as pas précisé dans quel environnement tu travailles) permettant d'identifier le dossier dans lequel se trouve le programme.

Bonne continuation.

La routine get_command_argument(0,...) permet de récupérer le nom du programme de la commande de lancement du programme. Si le programme est lancer avec le chemin d'accès complet, il pourrait être ainsi récupéré. Sinon, et bien que ce soit improbable, peut-être que get_command_argument retourne le chemin complet même s'il n'apparait pas.

Cela dit, la stratégie d'écrire dans le répertoire du programme est discutable. Dans un environnement multi-usagers ou multi-processus, les conflits sont prévisibles. En général, il est préférable d'utiliser un répertoire dédié aux fichiers temporaires.