VBS使用FileSystemObject刪除目錄中的文件和異常？

我使用的是相當優雅的Oracle商業智能軟件，我們經常遇到的問題是清除用戶系統上的特定數據，然後與服務器同步以再次下載數據。我有一個我正在處理的vbs腳本，它刪除了關鍵目錄，並重命名了其他並停止了服務等。VBS使用FileSystemObject刪除目錄中的文件和異常？

我卡在哪裏是在一個特定的目錄中。使用FileSystemObject，除了單個文件夾，刪除目錄中的每個文件最簡單的方法是什麼？

所以，對於這個具體的例子，我有C：\ OracleBIData \同步\ CONFIG

，我想刪除一切的「同步」目錄內，與config目錄例外。任何接受者？

來源

2011-02-18 Zer0mod

段：

Option explicit 

Const folderspec = "C:\OracleBIData\sync" 
Const excludeFolder = "C:\OracleBIData\sync\config" 

deleteSubFolders CreateObject("Scripting.FileSystemObject").GetFolder(folderspec), excludeFolder 

Public Sub deleteSubFolders(byRef MyFolder, exclFolder) 
    Dim sf 
    For Each sf in MyFolder.SubFolders 
     If not (lCase(sf.Path) = lCase(exclFolder)) Then 
      deleteSubFolders sf, exclFolder 
      sf.Delete 
     End If 
    Next 
End Sub

它不會刪除excludeFolder下的文件夾。

來源

2011-02-22 08:47:27 AutomatedChaos

AutomatedChaos，我在這一個晚了。雖然我能解決我的小問題，但我只想說謝謝你的答案。有一些不幸的家庭發展，並沒有真正回到這個線程。 – Zer0mod 2011-04-09 01:00:14

蠻力是我能想到的。

瀏覽目錄項目，但項目，並刪除它，如果它不是配置。或者如果這個目錄有很多很多很多的文件，首先運行刪除一個*。，b。*，d *。* 25次，然後遍歷剩下的項目。

來源

2011-02-18 03:25:44

VBS使用FileSystemObject刪除目錄中的文件和異常？

回答

相關問題