VBScript проблема файловой системы

Question

У меня есть следующие 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 

Я призываю сценарий в цикле из пакетного сценария, все в порядке, если строка начинается с >>>> комментируется, если раскомментировать, только загружается один из файлов. Например, если я дважды вызываю его для загрузки a.pdf ad b.pdf, он загружает только один из них. И если я прокомментирую указанную выше строку, она успешно загрузит все файлы. В чем проблема?

Answer 1

Я предлагаю вам показать нам ваш .bat-файл, но хрустальный шар подскажет мне, что вы дважды вызываете VBscript и не дожидаетесь завершения первого.

Я хотел бы попробовать в вашей партии

start /wait vbscipt... 

или

CALL vbscript... 

Как почему - как полный политик, когда дело доходит до VBScript, я хотел бы предложить, что вы открытия logfile для добавления, а второй скрипт выполняется, а первый stil имеет этот файл журнала.