SAVOIR LE NOM DU RÉPERTOIRE DE L'EXÉCUTABLE

MoiOlivier Messages postés 172 Date d'inscription mardi 15 juillet 2003 Statut Membre Dernière intervention 4 août 2005 - 24 mars 2005 à 17:58
bouv Messages postés 1411 Date d'inscription mercredi 6 août 2003 Statut Membre Dernière intervention 3 mars 2019 - 28 mars 2005 à 12:59
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/30305-savoir-le-nom-du-repertoire-de-l-executable

bouv Messages postés 1411 Date d'inscription mercredi 6 août 2003 Statut Membre Dernière intervention 3 mars 2019 1
28 mars 2005 à 12:59
crenaud76>> Ok je ne savais pas, cependant ce n'est pour moi qu'une question de rigueur.
Je sais ainsi que chaque fois que j'appel une varibale contenant un chemin, celui-ci se termine par "" et qu'il ne me reste qu'a ajouter le nom du fichier.
dpouliot Messages postés 50 Date d'inscription mardi 13 mai 2003 Statut Membre Dernière intervention 4 novembre 2008
27 mars 2005 à 07:46
Bonjour Abousamy
Pour InStrRev, je ne connaisais pas cette fonction.
L'important est d'éliminer les blancs de fin de chaine et de placer le "" final afin de pourvoir le réutiliser pour nos noms de fichier et\ou sous répertoire.

Bonne programation.
cs_Abousamy Messages postés 1 Date d'inscription dimanche 1 août 2004 Statut Membre Dernière intervention 26 mars 2005
26 mars 2005 à 13:04
Bonjour,

Il me semble que dans votre fonction, il serait plus efficace d'utiliser, pour la recherche du chemin, la fonction "InstrRev" (au lieu de la boucle WHILE).
[Contairement à "Instr", "InstrRev" commence la recherche à partir de la fin de la chaîne, ce qui correspond à ce que vous recherchez].

Ainsi la fin de votre fonction pouurait être :

Pos_nom = InStrRev(Chemin, "")
Fnc_ou_suisje = Left$(Chemin, Pos_nom)

A bientôt
crenaud76 Messages postés 4172 Date d'inscription mercredi 30 juillet 2003 Statut Membre Dernière intervention 9 juin 2006 28
25 mars 2005 à 12:21
Bouv < Moi, je me prend pas la tête, je rajoute systématiquement le "" derrière, car pour windoz, "c:\toto\\tata" est un chemin valide
bouv Messages postés 1411 Date d'inscription mercredi 6 août 2003 Statut Membre Dernière intervention 3 mars 2019 1
24 mars 2005 à 21:18
Oui pas de pb pour app.path, cela fonctionne pour les repertoires réseaux.
seul hic pour app.path si on est a la racine d'un disque il retourne pas le \
ex : pour le disque c cela retourne c: et non c:\
alors que si on est dans un rep ou sous rep il retourne qq chose comme
c:\MonRep\MonSousRep\

Pour ma part j'utilise la fonction suivante :

Public Function AppPath() as string
AppPath = App.Path
if not Right(AppPath, 1) "" then AppPath AppPath & ""
End Function

Bonne prog
++
MoiOlivier Messages postés 172 Date d'inscription mardi 15 juillet 2003 Statut Membre Dernière intervention 4 août 2005
24 mars 2005 à 17:58
Salut,
Juste pour savoir... La fonction App.Path fonctionne-t-elle aussi pour les répertoires réseaux (j'ai pas de quoi tester at home) ?

@+