国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > VBScript > 正文

VBS教程:方法-GetParentFolderName 方法

2020-07-26 12:12:18
字體:
供稿:網(wǎng)友

GetParentFolderName 方法

返回字符串,該字符串包含指定的路徑中最后一個文件或文件夾的父文件夾。

object.GetParentFolderName(path)

參數(shù)

object

必選項。應(yīng)為 FileSystemObject 的名稱。

path

必選項。指定路徑,要返回文件或文件夾的父文件夾名。

說明

如果 path 參數(shù)指定的文件或文件夾無父文件夾,則 GetParentFolderName 方法返回零長度字符串 ("")。

下面例子舉例說明如何使用 GetParentFolderName 方法:

Function GetTheParent(DriveSpec) Dim fsoSet fso = CreateObject("Scripting.FileSystemObject")GetTheParent = fso.GetParentFolderName(Drivespec)End Function

注意   GetParentFolderName 方法只能對提供 path 的字符串起作用。它不能試圖分析一個路徑,也不能檢查指定路徑是否存在。

更詳細的可以參考這篇文章:http://m.survivalescaperooms.com/shouce/vbs/vsmthGetParentFolderName.htm

給大家分享一個

VBS腳本遞歸創(chuàng)建多級(分級)目錄文件夾

CreateFolders "d:/ftptest/1/2/3/4/5" Function CreateFolders(path) Set fso = CreateObject("scripting.filesystemobject") CreateFolderEx fso,path set fso = NothingEnd FunctionFunction 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

主要是使用了遞歸調(diào)用的原理實現(xiàn)逐步目錄創(chuàng)建。

發(fā)表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發(fā)表
主站蜘蛛池模板: 永丰县| 苏尼特右旗| 宝山区| 海淀区| 尖扎县| 绩溪县| 延长县| 卢龙县| 文化| 大埔区| 双江| 来凤县| 天峻县| 灵武市| 临沂市| 阿尔山市| 海兴县| 广宁县| 格尔木市| 海兴县| 深泽县| 宜都市| 稷山县| 准格尔旗| 万安县| 商都县| 灵璧县| 中阳县| 西宁市| 平武县| 平顶山市| 惠安县| 华阴市| 昌都县| 丰顺县| 宜都市| 遂昌县| 嘉黎县| 高州市| 江安县| 平乐县|