Devuelve una cadena que contiene el nombre de la carpeta principal del último componente en una ruta especificada.
Sintaxis
object.GetParentFolderName(path)
Argumentos:
FileSystemObject.Nota:
El método GetParentFolderName solo funciona en la cadena de ruta proporcionada. No intenta resolver la ruta ni comprueba la existencia de la ruta especificada.
En el siguiente ejemplo se muestra el uso del método GetParentFolderName.
Ejemplo 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
Ejemplo 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