Word automation is not working in terminal server
I am having problem with word automation. my coding is working fine in local system.but it is not working in the terminal server. i am using word2003 professional but terminal server contains word2003 standard.please anyone help me.
<%
Set WordServer = Server.CreateObject("Test.Wordserver")
Set objWordobject = WordServer.GetWord 'Get Word instance
objWordobject.Visible = True
strTemplate="c:\template.dot"
'Open doc
Set objDocobject=objWordobject.Documents.add(strTempla te)
%>
Option Explicit
Private mwrdApp As Word.Application 'Holds Word instance
Private Sub Class_Initialize ()
Set mwrdApp = New Word.Application 'Create Word instance
End Sub
Private Sub Class_Terminate ()
mwrdApp.Quit 'Kill Word instance
Set mwrdApp = Nothing 'Kill reference
End Sub
Public Function GetWord () As Word.Application
Set GetWord = mwrdApp 'Return Word instance
End Function
Thanks,
Kalees
|