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 的字符串起作用。它不能试图分析一个路径,也不能检查指定路径是否存在。
更详细的可以参考这篇文章:https://www.jb51.net/shouce/vbs/vsmthGetParentFolderName.htm
给大家分享一个
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
主要是使用了递归调用的原理实现逐步目录创建。
广告合作:本站广告合作请联系QQ:858582 申请时备注:广告合作(否则不回)
免责声明:本站资源来自互联网收集,仅供用于学习和交流,请遵循相关法律法规,本站一切资源不代表本站立场,如有侵权、后门、不妥请联系本站删除!
免责声明:本站资源来自互联网收集,仅供用于学习和交流,请遵循相关法律法规,本站一切资源不代表本站立场,如有侵权、后门、不妥请联系本站删除!
暂无评论...
更新日志
2024年12月23日
2024年12月23日
- 小骆驼-《草原狼2(蓝光CD)》[原抓WAV+CUE]
- 群星《欢迎来到我身边 电影原声专辑》[320K/MP3][105.02MB]
- 群星《欢迎来到我身边 电影原声专辑》[FLAC/分轨][480.9MB]
- 雷婷《梦里蓝天HQⅡ》 2023头版限量编号低速原抓[WAV+CUE][463M]
- 群星《2024好听新歌42》AI调整音效【WAV分轨】
- 王思雨-《思念陪着鸿雁飞》WAV
- 王思雨《喜马拉雅HQ》头版限量编号[WAV+CUE]
- 李健《无时无刻》[WAV+CUE][590M]
- 陈奕迅《酝酿》[WAV分轨][502M]
- 卓依婷《化蝶》2CD[WAV+CUE][1.1G]
- 群星《吉他王(黑胶CD)》[WAV+CUE]
- 齐秦《穿乐(穿越)》[WAV+CUE]
- 发烧珍品《数位CD音响测试-动向效果(九)》【WAV+CUE】
- 邝美云《邝美云精装歌集》[DSF][1.6G]
- 吕方《爱一回伤一回》[WAV+CUE][454M]