Can't Create Word Document Error

[mevasquez]

I just upgraded to Office 2003 on the client machine and when I try to submit a form that opens a work document, I get an error, "Error: ActiveX component can't create object: 'Word.Application'. Has something changed in Office 2003? My code that used to work is as follows:

Dim oWA
Dim oWD
Dim oTables
Dim oTable
Dim strServerName
set oWA = CreateObject("Word.Application") [COLOR=green]'Here is where I get the error[/color]
strServerName="<%=Request.ServerVariables("SERVER_NAME")%>"

If strServerName = "localhost" Then
    Set oWD = oWA.Documents.Open("[URL unfurl="true"]http://localhost/Templates/TrainingSheet.doc")[/URL]
Else
    Set oWD = oWA.Documents.Open("[URL unfurl="true"]https://"[/URL] & strServerName & "/Templates/TrainingSheet.doc")
End If

Set oTables = oWD.Tables
Set oTable = oTables.Item(1)
<%=strWordCommands %>
oWA.Visible = True
oWD.UserControl = True
Set oTables = Nothing
Set oTable = Nothing
Set oWD = Nothing
Set oWA = Nothing

TIA

Mike

 

[Sheco]

Is that client-side code?

 

[mevasquez]

I believe so. The beginning of the script begins with

<%@ Language = "VBScript" %>
<% option explicit %>
<% Response.Buffer = true %>

Shouldn't it open a document on my computer when accessing this Web page. My computer has Office 2003. The server does not.

Mike

 

[Sheco]

It sounds like maybe this file has some VBScript that runs on the server (ASP) and some other VBScript that runs on the browser (non-ASP).

It looks like the word application is being created by the non-ASP code because it uses plain CreateObject rather than Server.CreateObject

 

[mevasquez]

What would be my solution to create the word application?

Mike

 

[mevasquez]

Found the problem. Internet Explorer security was set wrong. When I set "Initialized and script ActiveX controls not marked as save" to "Prompt", it worked. Mine was set to disable.

Mike