Satura rādītājs
Šī īsa apmācība parādīs, kā izmantot FileSystemObject metodi GetFileName.
Iegūstiet faila nosaukumu, izmantojot VBA FileSystemObject
Šajā nodarbībā tiek izmantots FileSystemObject. Lai to izmantotu, jums būs jāiestata atsauce uz VB skripta izpildes laika bibliotēku. Plašāku informāciju skatiet šeit.
Lai iegūtu faila nosaukumu no jebkura ceļa, varat izmantot:
| 123456789101112 | Sub FSOGetFileName ()Dim faila nosaukums kā virkneDim FSO kā jauns FileSystemObjectIestatīt FSO = CreateObject ("Scripting.FileSystemObject")'Iegūstiet faila nosaukumuFileName = FSO.GetFileName ("C: \ ExamplePath \ ExampleFile.txt")'Iegūstiet faila nosaukumu bez paplašinājumaFileNameWOExt = Pa kreisi (FileName, InStr (FileName, ".") - 1)Beigu apakš |
Mainīgais FileName turēs vērtību “ExampleFile.txt”, mainīgais FileNameWOExt būs bez paplašinājuma “ExampleFile”.
Iegūstiet faila nosaukumu bez paplašinājuma
Kā minēts iepriekš, lai iegūtu faila nosaukumu bez paplašinājuma, izmantojiet šo koda rindu:
| 1 | FileNameWOExt = Pa kreisi (FileName, InStr (FileName, ".") - 1) |
