未知的運行時錯誤：'Workbooks.Add'（800a03ec）

Question

我最近繼承了一個經典ASP，除其他外，它利用Excel辦公自動化動態構建一個Excel文件，然后作為下載提供給用戶。

該網站最近被轉移到一台新的Windows Server 2012 R2服務器上，直到大約2周前它才開始運行。

我已經與基礎架構團隊進行了交談，他們報告說，在報告網站問題的同時，已應用了許多Windows更新（包括Office 2010 SP2）。

我已經隔離了asp vbscript（見下文），我可以用它來重新創建錯誤：

<%

Dim xlapp, WB
Const xlWorkSheet = -4167 

Set xlapp = Server.CreateObject("Excel.Application")
xlapp.ScreenUpdating = False
Set WB = xlapp.Workbooks.Add(xlWorksheet)

%>

我收到的具體錯誤是：

Microsoft VBScript運行時錯誤“800a03ec”

未知的運行時錯誤：'Workbooks.Add'

/Test.asp，第8行

我意識到Office自動化不是微軟推薦的方法，但與此同時，我想知道社區是否可以幫助解決這個錯誤，因為我已經閱讀了無數可能修復的博客文章，但都沒有。 有關信息，我還讓基礎架構團隊修復Office安裝以及重新啟動服務器。

Answer 1

嘗試改變

Set WB = xlapp.Workbooks.Add(xlWorksheet)

至

Set WB = xlapp.Workbooks.Add()