Question

所以我有一个复制文件夹的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

Answer 1

缓存文件写入。

右键单击“驱动器 - 属性 - 硬件”选项卡 - 选择驱动器，然后单击“属性”按钮，然后单击“策略”选项卡并清除复选框。

BITS在后台下载来自互联网的文件，例如Windows更新。

VBScript复制和BITS。什么时候结束？

1 个答案: