Innehållsförteckning
Denna korta handledning visar hur du använder metoden GetFileName för FileSystemObject.
Skaffa filnamn med VBA FileSystemObject
Denna lektion använder FileSystemObject. För att kunna använda det måste du ange en referens till VB-skriptets körtidsbibliotek. Se här för mer information.
För att hämta filnamnet från vilken sökväg som helst kan du använda:
| 123456789101112 | Sub FSOGetFileName ()Dim filnamn som strängDim FSO som nytt filsystemsystemAnge FSO = CreateObject ("Scripting.FileSystemObject")'Hämta filnamnFileName = FSO.GetFileName ("C: \ ExamplePath \ ExampleFile.txt")'Hämta filnamn utan tilläggFileNameWOExt = Vänster (FileName, InStr (FileName, ".") - 1)Avsluta Sub |
Filnamnsvariabeln kommer då att hålla värdet på "ExempelFile.txt", FilnamnWOExt -variabeln kommer att vara utan tillägget "Exempelfil".
Skaffa filnamn utan tillägg
Som nämnts ovan använder du denna kodrad för att få filnamnet utan tillägg:
| 1 | FileNameWOExt = Vänster (FileName, InStr (FileName, ".") - 1) |
