il te faudra parser le nom complet
exemple :
Petite Fonction
Function ExtraitNomDuFichier(
byval NomChemiComplet
as string)
as string
Dim NomComplet()
asstring NomComplet = NomChemiComplet.split("\")
' Ou "/" suivant les systèmes Return NomComplet(NomComplet.lenght -1)
'Avec extension
'ou sans l'extension
'Return NomComplet(NomComplet.lenght -1).Split(".")(0)End FunctionLe savoir n'est que le filtre de l'experience