そのため、フォルダーをコピーするための VBScript があります。タイムトライアルを行っているため、スクリプトが終了した後もコピーがバックグラウンドで継続しているように見えることに気付きました。
何が起こっているのかと思うと、コピーされる最後のファイルが開始されたときに、スクリプトが存在します...最後のファイルのコピーが終了したときではありません。
これは Windows の BITS サービスが原因だと思います。正確なタイム トライアルが必要な場合、タイム トライアルが最初から最後まで行われるようにするには、何を無効にするか、または書き込む必要がありますか?
これは私が持っているものです
Sub CopyDirs( fromFolder, toFolder )
Dim oFSO
Dim c_folder, c_File, subFolder
Set oFSO = CreateObject( "Scripting.FileSystemObject" )
Set c_folder = oFSO.GetFolder( fromFolder )
If Not( oFSO.FolderExists( toFolder ) ) Then
oFSO.CreateFolder toFolder
End If
For Each c_File In c_folder.Files
If Not( oFSO.FileExists( toFolder & "\" & c_File.Name ) ) Then
oFSO.CopyFile c_folder.Path & "\" & c_File.Name, toFolder & "\" & c_File.Name
End If
Next
For Each subFolder In c_folder.SubFolders
If Not( oFSO.FolderExists( toFolder & "\" & subFolder.Name ) ) Then
oFSO.CreateFolder toFolder & "\" & subFolder.Name
End If
CopyDirs subFolder.Path, toFolder & "\" & subFolder.Name
Next
End Sub