Word.Application.Documents.Open dans un service windows

Bonjour,

dans un service windows je veux lancer l'application Word, pour cela je fais appel à la fonction Open:

Code:

---

1 2 3 4 5

WordApp = New Word.Application WordApp.Visible = True MyDoc = WordApp.Documents.Open(CheminFile) MyDoc.Activate()

---

le processus WINWORD.EXE est lancé et le service reste planté, si j'arrête le processus une exception de type ComException est lancé :

Citation:

---

System.Runtime.InteropServices.COMException (0x800706BE): Échec de l'appel de procédure distante. (Exception de HRESULT : 0x800706BE)

---

sachant que le même code je l'ai testé dans une application WinForm et ça marche bien !

la fonction open ne marche pas dans un service windows ?
Merci.

je donne plus de détail si cela peut aider
Voici ma fonction, celle ci ouvre un document modèle et le fusionne avec un fichier txt:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35

Dim WordAppli As Word.Application Dim MergeDoc As Word.Document Try   Dim TemplateFile As Object = "chemin fichier doc" Dim DataSourceFile As Object = "chemin fichier txt" Dim ObjMiss As Object = System.Reflection.Missing.Value 'Type.Missing Dim OFalse As Object = False Dim OTrue As Object = True   'Starting the Word Application WordAppli = New Word.Application WordAppli.Visible = False 'Open the Template file MergeDoc = WordAppli.Documents.Open(TemplateFile) 'Open the Data Source Dim DSFormat As Object = Word.WdOpenFormat.wdOpenFormatText MergeDoc.MailMerge.OpenDataSource(DataSourceFile, DSFormat, OFalse, ObjMiss, OTrue, OFalse, ObjMiss, ObjMiss, ObjMiss, ObjMiss, ObjMiss, ObjMiss, ObjMiss, ObjMiss, ObjMiss, ObjMiss) 'Perform the Mail Merge MergeDoc.MailMerge.Destination = Word.WdMailMergeDestination.wdSendToPrinter MergeDoc.MailMerge.SuppressBlankLines = False MergeDoc.MailMerge.Execute(OFalse)   Catch exCom As COMException ' traitement Catch ex As Exception 'traitement Finally 'Close the template document. If Not MergeDoc Is Nothing Then MergeDoc.Close() If Not WordAppli Is Nothing Then WordAppli.Quit() MergeDoc = Nothing WordAppli = Nothing End Try

---

dans une winForm ce code marche très bien or dans le service windows, le service reste planté aucune exception n'est levée !!!!!

dans ce même service windows j'ai testé la fonction add pour ajouter un document, et open pour modifier un existant : les deux marchent!

je ne sais pas où se situe mon problème, est ce dans open ou dans l'appel à MailMerge ?