|
Chilkat • HOME • .NET Core C# • Android™ • AutoIt • C • C# • C++ • Chilkat2-Python • CkPython • Classic ASP • DataFlex • Delphi ActiveX • Delphi DLL • Go • Java • Lianja • Mono C# • Node.js • Objective-C • PHP ActiveX • PHP Extension • Perl • PowerBuilder • PowerShell • PureBasic • Ruby • SQL Server • Swift 2 • Swift 3,4,5... • Tcl • Unicode C • Unicode C++ • VB.NET • VBScript • Visual Basic 6.0 • Visual FoxPro • Xojo Plugin
(VBScript) Demonstrate Directory Path FunctionsDemonstrates the path functions GetDirectoryName, GetExtension, GetFileName, and GetFileNameWithoutExtension.
Dim fso, outFile Set fso = CreateObject("Scripting.FileSystemObject") 'Create a Unicode (utf-16) output text file. Set outFile = fso.CreateTextFile("output.txt", True, True) ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.FileAccess") set fac = CreateObject("Chilkat.FileAccess") ' Note: Chilkat accepts either forward slash or backslash chars as directory separators.. outFile.WriteLine(fac.GetDirectoryName("/MyDir/MySubDir/myfile.ext")) outFile.WriteLine(fac.GetDirectoryName("/MyDir/MySubDir")) outFile.WriteLine(fac.GetDirectoryName("/MyDir/")) outFile.WriteLine(fac.GetDirectoryName("/MyDir")) outFile.WriteLine(fac.GetDirectoryName("/")) outFile.WriteLine(fac.GetExtension("C:/mydir.old/myfile.ext")) outFile.WriteLine(fac.GetExtension("C:/mydir.old/")) outFile.WriteLine(fac.GetFileName("C:/mydir/myfile.ext")) outFile.WriteLine(fac.GetFileName("C:/mydir/")) outFile.WriteLine(fac.GetFileNameWithoutExtension("C:/mydir/myfile.ext")) outFile.WriteLine(fac.GetFileNameWithoutExtension("C:/mydir/")) outFile.WriteLine("---") outFile.Close |
||||
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.