Lang L: none (table-of-contents)
See lühike õpetus näitab, kuidas kasutada FileSystemObjecti meetodit GetFileName.
Hankige failinimi VBA FileSystemObject abil
See õppetund kasutab FileSystemObject. Selle kasutamiseks peate määrama viite VB skripti käitusajale. Lisateavet leiate siit.
Failinime saamiseks mis tahes teelt saate kasutada järgmist.
| 123456789101112 | Alam FSOGetFileName ()Hämarda failinimi stringinaDim FSO uue failisüsteemi objektinaMäära FSO = CreateObject ("Scripting.FileSystemObject")'Hangi faili nimiFileName = FSO.GetFileName ("C: \ ExamplePath \ ExampleFile.txt")'Hangi failinimi ilma laienditaFileNameWOExt = Vasak (FileName, InStr (FileName, ".") - 1)End Sub |
Muutuja FileName hoiab seejärel väärtust „ExampleFile.txt”, muutuja FileNameWOExt jääb ilma laiendita „ExampleFile”.
Hankige failinimi ilma laiendita
Nagu eespool märgitud, kasutage failinime ilma laiendita saamiseks seda koodirida:
| 1 | FileNameWOExt = Vasak (FileName, InStr (FileName, ".") - 1) |
