Discussion :

[yoda1000]

Dans un formulaire access, j'ai une zone de liste dans laquelle apparait les chemins complet de fichiers situés dans un dossier.
Sur chaque clic, apparait une action lié au nom complet (ouverture image, lecture d'un son,...).
Comment recuperer, le nom du fichier plutot que le nom complet !
Ca me ferait gagner de la place, c'est long ces nom complet....

[zEndymion]

Slt,

Un petit exemple avec la bibliothèque FileSystem

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
    Dim fs As New FileSystemObject
    Debug.Print fs.GetFile(CurrentDb.Name).Name

[yoda1000]

J'ai un soucis de syntaxe, peut être peux tu m'aider !
Dans un champ texte1 j'ai le nom complet, et apres mise à jour je veux dans le champ texte2 le nom du fichier.

[Caroline1]

FileSystemObject doit être disponible par tes références. Je ne sais pas dans quelle librairie fileSystem se trouve.

Tu peux aussi le faire à la mitaine.

Avec Access 2003:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Dim strFile As String
strFile = "C:\UnRepertoire\UnSousRépertoire\Fichier.txt"
Debug.Print Right(strFile, Len(strFile) - InStrRev(strFile, "\"))

Debug.Print affiche "Fichier.txt"

Je précise Access2003 car je ne sais pas si ces fonctions sont disponibles aussi par défaut avec les versions moins récentes.

Caroline

[yoda1000]

Oki !
C'etait tout bete !

Private Sub Texte5_AfterUpdate()
Dim fs As New FileSystemObject
Dim toto As String
toto = Me.Texte5
Me.Texte2 = fs.GetFile(toto).Name
End Sub

Merki

[Caroline1]

Cool :-).
N'oublie pas la balise Code # pour présenter ton code. Ça facilite la lecture.

[yoda1000]

Oki, merci pour les reponses rapide !
J'ai d'autres soucis avec le nom de fichier dans une zone de liste, je l'ai mis dans une autre discution pour plus de clarté, et avec les balise #, (sic Caroline...)