Gibt eine Zeichenfolge zurück, die den Namen des übergeordneten Ordners der letzten Komponente in einem angegebenen Pfad enthält.
Syntax
object.GetParentFolderName(path)
Argumente:
FileSystemObject.Hinweis:
Die GetParentFolderName-Methode funktioniert nur mit der angegebenen Pfadzeichenfolge. Es wird weder versucht, den Pfad aufzulösen, noch wird geprüft, ob der angegebene Pfad vorhanden ist.
Das folgende Beispiel veranschaulicht die Verwendung der GetParentFolderName-Methode.
Beispiel 1:
Function GetTheParent(DriveSpec)
Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
GetTheParent = fso.GetParentFolderName(DriveSpec)
End Function
' Usage
Dim parentFolder
parentFolder = GetTheParent("C:\Path\To\Your\File.txt")
' Output: C:\Path\To\Your
Beispiel 2:
Function GetTheParent(DriveSpec)
Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
GetTheParent = fso.GetParentFolderName(DriveSpec)
End Function
' Usage
Dim parentOfDirectory
parentOfDirectory = GetTheParent("C:\Path\To\Your\Folder\SubFolder")
' Output: C:\Path\To\Your\Folder