如何使用VBScript創建目錄和子目錄？

我有一個變量copyFolderPath爲c:\images\movies\users\joe\如何使用VBScript創建目錄和子目錄？

我有以下代碼：

If objFSO.FolderExists(copyFolderPath) = False Then 
    Wscript.Echo "Creating: " + copyFolderPath 
    objFSO.createFolder copyFolderPath 
End If

的問題是，如果不存在，這只是創建joe目錄。我需要的代碼也會創建users,movies或images目錄，如果它們不存在。

我該怎麼做？

來源

2013-11-21 Ethan Allen

[文件夾複製到另一個路徑得到錯誤（可能重複http://stackoverflow.com/questions/17174284/copying-folder-to-another-路徑得到錯誤） –

我結束了使用此功能：

Sub subCreateFolders(strPath) 

    If Right(strPath, 1) <> "\" Then 
     strPath = strPath & "\" 
    End If 

    strNewFolder = "" 
    Do Until strPath = strNewFolder 
     strNewFolder = Left(strPath, InStr(Len(strNewFolder) + 1, strPath, "\")) 

     If objFSO.FolderExists(strNewFolder) = False Then 
     objFSO.CreateFolder(strNewFolder) 
     End If 
    Loop 
End Sub

來源

2013-11-21 20:34:40

如何使用VBScript創建目錄和子目錄？

回答

相關問題