Page 1 sur 1
[RESOLU] Connaître le nom d'un dossier
Publié : mer. 10/nov./2021 15:55
par omega
Bonjour,
Supposons que l'on choisit, dans une boite de dialogue, le dossier (ou répertoire) suivant:
c:\mesprog\gestion\Data\
Ma question est très simple: comment récupérer le nom du dossier sélectionné ? Je cherche à connaître UNIQUEMENT le nom du dossier et non pas le chemin complet, dans cet exemple se sera: Data
Merci de votre aide
Re: Connaître le nom d'un dossier
Publié : mer. 10/nov./2021 15:59
par omega
Je sais qu'en passant par le balayage du chemin complet, à l'aide par exemple de findString, ça sera une des solutions, mais je préfère une instruction Pb plus simple qui consiste à récupérer le nom du répertoire directement sans passer par des tests de caractères....
Re: Connaître le nom d'un dossier
Publié : mer. 10/nov./2021 16:16
par omega
Je crois que je n'ai pas le choix
Code : Tout sélectionner
Dossier$ = PathRequester("Choisissez un dossier à compresser", dossier$)
If Dossier$
For k=1 To Len(dossier$)
NomDossier$=StringField(dossier$, k, "\")
Next
Debug NomDossier$
Re: [RESOLU] Connaître le nom d'un dossier
Publié : mer. 10/nov./2021 16:27
par Micoute
Pourquoi n'utilise-tu pas GetFilePart() ?
Re: [RESOLU] Connaître le nom d'un dossier
Publié : mer. 10/nov./2021 16:49
par Marc56
(avec ou sans \ final)
Code : Tout sélectionner
Dossier$ = "C:\mesprog\gestion\Data\"
Debug StringField(Dossier$, CountString(RTrim(Dossier$, "\"), "\") + 1, "\")
Ou en utilisant la proposition de Micoute
(on triche en supprimant l'\ final ce qui fait croire au système que le dernier répertoire est un fichier

, donc
GetFilePart() fonctionne dans ce cas.)
Code : Tout sélectionner
Dossier$ = "C:\mesprog\gestion\Data\"
Debug GetFilePart(RTrim(Dossier$, "\"))
