【发布时间】:2011-12-02 06:28:31
【问题描述】:
在将我们的 Intranet 从 Windows 2000/IIS 4 机器转换为 Windows 2008/IIS 7 机器的过程中。现在只是直接进行转换,着眼于将来用 C#.NET 重新开发一些应用程序。
新服务器安装了 Word 2010,旧服务器安装了 Word 2003。
经典 ASP 应用程序遇到问题。正在尝试基于模板文档创建和修改 Word 文档。
收到以下错误:
Microsoft VBScript runtime error '800a01a8'
Object required: 'Documents.Open(...)'
它试图运行的代码如下:
Dim wrdObj
Set wrdObj = Server.CreateObject("Word.application")
Dim wrdDoc
Set wrdDoc = Server.CreateObject("Word.Document")
Set wrdDoc = wrdObj.Documents.Open(docRoot & docName)
' Do word assignments
With wrdDoc
.Variables("Today").Value = rs.Fields.Item("TODAY").Value & " "
.Variables("Requester").Value = Request.QueryString("strUser") & " "
.Variables("Ship_Comp").Value = rs.Fields.Item("TXT_VENDOR_NAME").Value & " "
.Variables("Ship_Addr").Value = rs.Fields.Item("ADDR").Value & " "
.Variables("Ship_City").Value = rs.Fields.Item("CITY").Value & " " & rs.Fields.Item("STATE_ZIP").Value
.Variables("Ship_Country").Value = rs.Fields.Item("COUNTRY").Value & " "
.Fields.Update
.Save
End With
'wrdDoc.Section
wrdDoc.Close
Set wrdDoc = Nothing
wrdObj.Quit
Set wrdObj = Nothing
以下行失败:
Set wrdDoc = wrdObj.Documents.Open(docRoot & docName)
我已经进行了大量搜索,但出于某种奇怪的原因,似乎没有多少人在经典 ASP 中使用 Word 2010 自动化...:)
【问题讨论】:
标签: iis-7 asp-classic ms-word