Separation du chemin et du nom de fichier

Question

Bonjour !!
Merci de m"aider a resoudre ce probleme:
Entrex un chemin incluant un nom de fichier dans uen boite de texte.Lorsque la touche "Enter" est appuyée , le chemin apparait dans une etiquette et le nom du fichier dabs une autre étiquette.
Merci a+

cs_Jack · Answer

Salut eric_piccaut
Ce qui sépare le nom d'un fichier et des sous-répertoires, c'est le dernier signe \.
L'instruction InstrRev retrouve la place d'un caractère dans une chaine, mais en commençant par la fin (contrairement à Instr).
Le InstRev te renverra le chiffre correspondant à l'emplacement de ce caractère.
Position = InstrRev(Chaine, "")Pour isoler les noms, tu n'as plus qu'à jouer avec l'instruction Left pour les sous-répertoires :
SousRép = Left(Chaine, Position) et avec l'instruction Mid pour le nom du fichier :
NomFichier = Mid(Chaine, Position + 1)le +1 étant la pour commencer au caractère qui suit le \ qui vient d'être trouvé.
Mais voilà : si la Chaine que tu vas lui fournir ne comporte pas de sous-répertoire, InstrRev va te retourner 0 (ou -1, je ne sais plus). Dans ce cas là, les instructions Left et Mid au dessus vont buguer (un argument = 0)
Pour éviter ça, il suffit de tester si Position a bien une valeur correcte :
If Position > 0 Then
SousRép = Left(Chaine, Position)
NomFichier = Mid(Chaine, Position + 1)
End If

Vala
Jack

Separation du chemin et du nom de fichier

1 réponse

Discussions similaires