Не закрывается Excel из скрипта VBS

@victorsaratov · Регистрация: 22.06.2015

Author24 — интернет-сервис помощи студентам

Суть в следующем:
есть файл file.xls
в качестве параметра передается
WSCRIPT conv.vbs file.xls

conv.vbs ниже

Visual Basic

Const xlFrmt = 56
Set objXl=CreateObject("Excel.Application")
        ObjXl.DisplayAlerts = FALSE
Set oDoc=objXl.WorkBooks.Open(WScript.Arguments(0))
Set ls = oDoc.Worksheets(1)
oDoc.SaveAs WScript.Arguments(0),xlfrmt
set ls = Nothing
oDoc.saved = true
oDoc.close
set odoc = Nothing
objXl.quit
set objXl=Nothing
Application.Quit

Проблема в том что все это выполняется в планировщике заданий и выясняется, что Excel не закрывается, и все далее из-за етого встает.

@victorsaratov · 22.06.2015, 22:34 **[ТС]**

13 тую строчку считать недействительной, ее в реальности нет)

@victorsaratov 0 / 0 / 0 Регистрация: 22.06.2015 Сообщений: 2
	22.06.2015, 22:34 [ТС]	2
	13 тую строчку считать недействительной, ее в реальности нет) 0