十年网站开发经验 + 多家企业客户 + 靠谱的建站团队
量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决
本篇内容主要讲解“VBS中GetParentFolderName方法的使用”,感兴趣的朋友不妨来看看。本文介绍的方法操作简单快捷,实用性强。下面就让小编来带大家学习“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 的字符串起作用。它不能试图分析一个路径,也不能检查指定路径是否存在。
更详细的可以参考这篇文章:/tupian/20230522/ppre>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
主要是使用了递归调用的原理实现逐步目录创建。
到此,相信大家对“VBS中GetParentFolderName方法的使用”有了更深的了解,不妨来实际操作一番吧!这里是创新互联建站,更多相关内容可以进入相关频道进行查询,关注我们,继续学习!