vbscript - 1024 VBSCRIPT 中的预期语句运行时错误

Question

我是 VBS 编码的新手，并且一直在我的 VBScript 中收到 1024 Expect Statement Error。

Set args = WScript.Arguments
strDownloadsDirectory = args.Item(0)
strExportedFileName = args.Item(1)
strdestinationFolder = args.Item(2)
strAccountWorksheetName = args.Item(3)
strdestinationFilename = args.Item(4)


'Excel Object
Set objExcel = CreateObject("Excel.Application")

'Excel Document Visible Property
objExcel.Visible = True

'Workbook Object
Set objWorkbook = objExcel.Workbooks.Open(strDownloadsDirectory & strExportedFileName)
Set objWorkbook_Dest = objExcel.Workbooks.Open(strdestinationFolder & strdestinationFilename)
Set objWorksheet = objWorkbook.Worksheets("Sheet1")

objWorkbook.Sheets(1).Copy after:=objWorkbook_Dest.Sheets(objWorkbook_Dest.Sheets.Count)
Set objWorkSheetDest = objWorkbook_Dest.Worksheets("Sheet1")
objWorkSheetDest.Name = strAccountWorksheetName

objWorkbook_Dest.Save
objWorkbook_Dest.Close
objWorkbook.Save
objWorkbook.Close
objExcel.Quit

Set objWorkbook = Nothing
Set objExcel = Nothing
Set objWorkbook_Dest = Nothing

标签： vbscript