VBS教程：方法-GetParentFolderName 方法_VBS

VBS教程：方法-GetParentFolderName 方法

2020-06-10 11:05脚本之家 VBS

vbs GetParentFolderName用来获取指定的路径中最后一个文件或文件夹的父文件夹

GetParentFolderName 方法

返回字符串，该字符串包含指定的路径中最后一个文件或文件夹的父文件夹。

object.GetParentFolderName(path)

参数

object

必选项。应为 FileSystemObject 的名称。

path

必选项。指定路径，要返回文件或文件夹的父文件夹名。

说明

如果 path 参数指定的文件或文件夹无父文件夹，则 GetParentFolderName 方法返回零长度字符串 ("")。

下面例子举例说明如何使用 GetParentFolderName 方法：

				?

									Function GetTheParent(DriveSpec) 

									Dim fso

									Set fso = CreateObject("Scripting.FileSystemObject")

									GetTheParent = fso.GetParentFolderName(Drivespec)

									End Function

注意 GetParentFolderName 方法只能对提供 path 的字符串起作用。它不能试图分析一个路径，也不能检查指定路径是否存在。

给大家分享一个

VBS脚本递归创建多级(分级)目录文件夹

				?

									CreateFolders "d:\ftptest\1\2\3\4\5"

									Function CreateFolders(path)

									 Set fso = CreateObject("scripting.filesystemobject")

									 CreateFolderEx fso,path

									 set fso = Nothing

									End Function

									Function CreateFolderEx(fso,path)

									 If fso.FolderExists(path) Then

									 Exit Function

									 End If

									 If Not fso.FolderExists(fso.GetParentFolderName(path)) Then

									 CreateFolderEx fso,fso.GetParentFolderName(path)

									 End If

									 fso.CreateFolder(path)

									End Function