Indholdsfortegnelse
Denne korte vejledning viser, hvordan du bruger GetFileName -metoden i FileSystemObject.
Få filnavn med VBA FileSystemObject
Denne lektion bruger FileSystemObject. For at kunne bruge det skal du angive en reference til VB-scriptets kørebibliotek. Se her for mere information.
For at få filnavnet fra enhver sti kan du bruge:
| 123456789101112 | Sub FSOGetFileName ()Dim filnavn som strengDim FSO som nyt filsystemsystemIndstil FSO = CreateObject ("Scripting.FileSystemObject")'Hent filnavnFilnavn = FSO.GetFileName ("C: \ ExamplePath \ ExampleFile.txt")'Hent filnavn ingen udvidelseFileNameWOExt = Venstre (Filnavn, InStr (Filnavn, ".") - 1)Afslut Sub |
Filnavnvariablen vil derefter holde værdien af "Eksempelfil.txt", FilnavnWOExt -variabel vil være uden udvidelsen "Eksempelfil".
Få filnavn uden udvidelse
Som nævnt ovenfor skal du bruge denne kodelinje for at få filnavnet uden udvidelse:
| 1 | FileNameWOExt = Venstre (Filnavn, InStr (Filnavn, ".") - 1) |
