Batch file VBScript文件系统问题

我有以下vbscript

    Set colNamedArguments = WScript.Arguments.Named
    dim logFSO, logFile
    Const ForReading = 1, ForWriting = 2, ForAppending = 8
    Set logFSO = CreateObject("Scripting.FileSystemObject")
>>>>    'Set logFile = logFSO.OpenTextFile("a.log", ForAppending, True)

    strFileURL = <passed from batch script>
         strHDLocation = <passed from batch script>
    WebUser = "user"
    WebPass = "pwd"


    Set objXMLHTTP = CreateObject("MSXML2.XMLHTTP")

    'objXMLHTTP.open "GET", strFileURL, false
    objXMLHTTP.open "GET", strFileURL, false, WebUser, WebPass
    objXMLHTTP.send()

    If objXMLHTTP.Status = 200 Then
      Set objADOStream = CreateObject("ADODB.Stream")
      objADOStream.Open
      objADOStream.Type = 1 'adTypeBinary

      objADOStream.Write objXMLHTTP.ResponseBody
      objADOStream.Position = 0    'Set the stream position to the start

      'Set objFSO = Createobject("Scripting.FileSystemObject")
       ' If objFSO.Fileexists(strHDLocation) Then objFSO.DeleteFile strHDLocation
      'Set objFSO = Nothing

      objADOStream.SaveToFile strHDLocation
      objADOStream.Close
      Set objADOStream = Nothing
    End if

    Set objXMLHTTP = Nothing

Set colNamedArguments=WScript.Arguments.Named
dim logFSO，日志文件
读取常数=1，写入常数=2，外观常数=8
设置logFSO=CreateObject（“Scripting.FileSystemObject”）
>>>>'Set logFile=logFSO.OpenTextFile（“a.log”，用于显示，True）
strFileURL=
标准位置=
WebUser=“用户”
WebPass=“pwd”
设置objXMLHTTP=CreateObject（“MSXML2.XMLHTTP”）
'objXMLHTTP.open“GET”，strFileURL，false
objXMLHTTP.open“GET”，strFileURL，false，WebUser，WebPass
objXMLHTTP.send（）
如果objXMLHTTP.Status=200，则
设置objADOStream=CreateObject（“ADODB.Stream”）
objADOStream，打开
objADOStream.Type=1'adTypeBinary
objADOStream.Write objXMLHTTP.ResponseBody
objADOStream.Position=0'将流位置设置为起始位置
'Set objFSO=Createobject（“Scripting.FileSystemObject”）
'如果objFSO.Fileexists（strHDLocation），则objFSO.DeleteFile strHDLocation
'设置objFSO=无
objADOStream.SaveToFile strHDLocation
objADOStream，关闭
设置objADOStream=Nothing
如果结束
设置objXMLHTTP=Nothing

我在一个循环中从批处理脚本中调用脚本，如果以>>>>开头的行被注释，事情就好办了，如果它没有注释，则只下载一个文件。 例如，如果我调用它两次来下载a.pdf和b.pdf，它只下载其中一个。

---

如果我注释掉上面提到的行，它将成功下载所有文件。有什么问题吗？

我建议您向我们展示您的.bat文件-但水晶球告诉我，您正在调用VBscript两次，而不是等待第一次完成

我想试试你的那批

start /wait vbscipt...

或

至于原因——作为一个完整的政治家，当谈到VBScript时，我建议您打开日志文件进行追加，第二个脚本在第一个stil打开该日志文件时运行

CALL vbscript...