jockos
Messages postés321Date d'inscriptiondimanche 22 octobre 2000StatutMembreDernière intervention14 mai 20052 9 sept. 2002 à 23:05
Comment tu te galère la vie man avec ce code...
Tu peux le faire en 3 lignes:
Soit la variable FileName contenant le Path
Dim FirstHeader As Long
'dernier slash du Path
FirstHeader = InStrRev(FileName, "")
'Nom du Fichier sans le Path
FileName = Right$(FileName, Len(FileName) - FirstHeader)
Jockos
vbbreizh
Messages postés73Date d'inscriptionlundi 25 juin 2001StatutMembreDernière intervention13 novembre 20051 18 févr. 2002 à 15:06
dans la méthode n°2 il faut lire :
MsgBox str(Right(FilePath, pos- 1)),0+64,"Nom du fichier..."
et non
MsgBox str(Right(FilePath, i - 1)),0+64,"Nom du fichier..."
Cordialement à tous. VBBreizh
9 sept. 2002 à 23:05
Tu peux le faire en 3 lignes:
Soit la variable FileName contenant le Path
Dim FirstHeader As Long
'dernier slash du Path
FirstHeader = InStrRev(FileName, "")
'Nom du Fichier sans le Path
FileName = Right$(FileName, Len(FileName) - FirstHeader)
Jockos
18 févr. 2002 à 15:06
MsgBox str(Right(FilePath, pos- 1)),0+64,"Nom du fichier..."
et non
MsgBox str(Right(FilePath, i - 1)),0+64,"Nom du fichier..."
Cordialement à tous. VBBreizh