Lo siento, se me ha colado!
Ahora ya no tengo ese error, y el word si está instalado en el servidor. Ahora no me da ningún error pero se queda bloquedo. He probado lo mismo con el excel y no tengo problemas, el problema es el word!!! pyroCL, a que dlls te referias?
Código:
Sub OpenWord()
Dim strError As String = "OK"
Try
Dim wdApp As Object
Dim wdDoc As Object
wdApp = CreateObject("Word.application")
wdDoc = wdApp.Documents.Open("C:\test\doc2.doc")
wdDoc.Content.InsertAfter("Hello World!")
wdDoc.Content.InsertParagraphAfter()
wdDoc.Close(savechanges:=True)
wdDoc = Nothing
wdApp.Quit()
wdApp = Nothing
Catch ex As Exception
strError = ex.Message
End Try
MostrarError(strError)
End Sub