répertoire d'un fichier

Question

Je cherche a récupérer le répertoire d'un fichier mais juste le répertoire précédent, c'est à dire : si j'ai c:\jeux\action\DB	oto.txt  je voudrais récuperer dans une zone texte juste \DB

La ligne de commande ayant était choisi par une boite OUVRIR je sais que le chemin est stocker dans .filename
dois-je me servir de cela ?
est ce deja au moins possible de recupere juste ce repertoire ?

Merci de votre aide.

cs_Zoltan67 · Answer

si tu prends le filename, tu auras le nom de fichier avec le chemin, donc il faut le traiter. tu peux faire comme ca par exemple :


'cdl est le commondialog
Dim str As String 'chaine qui contiendra le répertoire
str = Left(cdl.FileName, Len(cdl.FileName) - Len(cdl.FileTitle) - 1)
While InStr(2, str, "") <> 0
    str = Mid(str, InStr(2, str, ""))
Wend
str = str & ""


g testé, ça a l'air de marcher.regarde si tu arrives à en faire qqch et fais moi signe

TemplarVB · Answer

C'est génial ca marche, je te remercie, je suppose qu'en modifiant les chiffres je peux prendre les deux répertoires précédents si je vx voire trois, ...etc suivant le besoin je vais donc tester cela.
Encore merci.

Répertoire d'un fichier

2 réponses

Discussions similaires