यह संक्षिप्त ट्यूटोरियल प्रदर्शित करेगा कि FileSystemObject की GetFileName विधि का उपयोग कैसे करें।
VBA FileSystemObject के साथ फ़ाइल का नाम प्राप्त करें
यह पाठ FileSystemObject का उपयोग करता है। इसका उपयोग करने के लिए, आपको वीबी स्क्रिप्ट रन-टाइम लाइब्रेरी का संदर्भ सेट करना होगा। अधिक जानकारी के लिए यहां देखें।
किसी भी पथ से फ़ाइल नाम प्राप्त करने के लिए, आप इसका उपयोग कर सकते हैं:
| 123456789101112 | उप FSOGetFileName ()स्ट्रिंग के रूप में मंद फ़ाइल नामनई फाइलसिस्टमऑब्जेक्ट के रूप में मंद एफएसओFSO सेट करें = CreateObject ("Scripting.FileSystemObject")'फ़ाइल नाम प्राप्त करें'FileName = FSO.GetFileName("C:\ExamplePath\ExampleFile.txt")'फ़ाइल नाम प्राप्त करें कोई एक्सटेंशन नहीं'FileNameWOExt = लेफ्ट (फाइलनाम, इनस्ट्र (फाइलनाम, "।") - 1)अंत उप |
FileName वेरिएबल तब "ExampleFile.txt" का मान रखेगा, FileNameWOExt वेरिएबल एक्सटेंशन "ExampleFile" के बिना होगा।
एक्सटेंशन के बिना फ़ाइल नाम प्राप्त करें
जैसा कि ऊपर उल्लेख किया गया है, बिना एक्सटेंशन के फ़ाइल नाम प्राप्त करने के लिए कोड की इस पंक्ति का उपयोग करें:
| 1 | FileNameWOExt = लेफ्ट (फाइलनाम, इनस्ट्र (फाइलनाम, "।") - 1) |
