Как «Записать в новый файл .csv» или «Сохранить как новый файл .csv» в vbscript

Question

У меня есть текстовый файл для чтения и выходной текстовый файл (.csv) для записи. Ошибки с входа записываются на выход. У меня проблема в том, что сценарий может использовать несколько человек, и мне не нужны проблемы с выходным файлом.

Входной файл может быть выбран из любого места. Но расположение выходного файла жестко закодировано в моем скрипте в сетевом расположении.

Я пытался записать выходной файл .csv во время работы скрипта. В конце скрипта пользователю предлагается просмотреть выходной файл (список ошибок). Я хотел бы сохранить как исходный файл .csv, а затем открыть его пользователю, чтобы он никогда не использовался.

Sub subExternalFile
strFilter = ""
strExternalFilePath = funcSolicitFile(strFilter)
strExternalFilePath1 = 
    "\\DAYFS02\mortsvc$\_Scripts_Custom\TaskScript_OutPut.csv"  
Set objFile = 
     oFileObject.OpenTextFile(strExternalFilePath,ForReading)
     Set objFileOutput = 
     oFileObject.OpenTextFile(strExternalFilePath1,ForWriting)
       funcRunScriptConfirmation
End Sub

If strMsgBox = 6 Then

      OutputFileLocation = 
      "\\DAYFS02\mortsvc$\_Scripts_Custom\Task_Script_Output" & 
      Task_ID & "__" & Year(Date) & Right("0" & Month(Date),2) & 
      Right("0" & Day(Date),2) & ".csv"

      Set oExcelObject = GetObject("","Excel.Application")
      oExcelObject.DisplayAlerts = False
      oExcelObject.Workbooks(1).SaveAs "OutputFileLocation", 6

      Set ExcelWorkbook = 
      oExcelObject.Workbooks.Open(OutputFileLocation)
      oExcelObject.Application.Visible = True
        Wscript.Quit

Else            
   subTerminateScript("Script Completed")
End If

Я бы хотел написать в оригинал и сохранить как новый файл .csv, чтобы оригинал не использовался пользователями скрипта. Или я хотел бы просто иметь возможность открыть новый файл .csv и записать в него без сохранения вообще.