將文件從一個目錄移動到另一個目錄的VBscript

Question

我是VBscript的新手，希望能夠將特定數量的文件從一個目錄移動到另一個目錄。

現在，我目前有一組3個文件（用於測試目的）具有不同的擴展名，並且希望在源目錄內有3個文件（不多也不少）的情況下移動所有文件。我的代碼到目前爲：

Set fso=CreateObject("Scripting.FileSystemObject") 

Set fldr=fso.getFolder("C:\folderA) 
for each file in fldr.files 
    If fldr.files < 3 then 
      msgbox("Need more files") 
    Else 
      fso.MoveFile "C:\folderA\*", "C:\folderB" 
    End If 

任何幫助將不勝感激。 感謝

Answer 1

1. 使用fso.getFolder("C:\folderA").Files.Count獲得在C:\folderA的 文件的數量。
2. 做這個以前 - 不 - 一個遍歷文件（將其移動）
3. 考慮移動（並重新創建）的文件夾，如果它恰好包含3個文件

Answer 2

Set FSO=CreateObject("Scripting.FileSystemObject") 
Set fldr= FSO.GetFolder("C:\FolderA") 
Set Collec_Files= fldr.Files 
For Each File in Collec_Files 
    If Collec_Files.count < 3 then 
     msgbox("Need more files") 
    Else 
     FSO.MoveFile "C:\FolderA\*", "C:\FolderB" 
    End If 
Next