国产探花免费观看_亚洲丰满少妇自慰呻吟_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://www.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ā)表
主站蜘蛛池模板: 句容市| 呼伦贝尔市| 彭阳县| 龙胜| 兴仁县| 红河县| 南召县| 东海县| 武强县| 宜黄县| 潢川县| 松潘县| 汕尾市| 新余市| 黄骅市| 南澳县| 沾化县| 南投县| 上蔡县| 鲁山县| 吉隆县| 嘉荫县| 甘洛县| 西青区| 舒城县| 汝阳县| 北海市| 浪卡子县| 临湘市| 油尖旺区| 双桥区| 庄浪县| 泽普县| 仁寿县| 逊克县| 宁乡县| 长汀县| 秭归县| 岱山县| 靖江市| 隆德县|