[VB6] serveur word

Bonjour a tous
tt d'abord je tiens a précisé que mon probleme est deja traiter ,mais malheureusement pour moi, la solution proposé ne m'a pas aidé!(histoire d'eviter les " cherche d'abord et pose la question ensuite" lol).
bon passant au chose désagreable:
voila, je fait une appli qui générer des fichiers word, tt va pour le mieux pour une premiere géneration, mais dés que je relance pour un deuxieme fichier, l'erreur se produit qui est la suivante:

Code:

---

1 2	The remote server machine does not exist or is unavailable

---

le code que j'utilise est :

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

Dim tbl_MomTableau As Word.Table 'Dim wrd_DocWord As Word.Application Dim str_Chemin As String   Set wrd_DocWord = New Word.Application   wrd_DocWord.Visible = True str_Chemin = App.Path & "\Doc1.doc"   wrd_DocWord.Documents.Open str_Chemin   wrd_DocWord.ActiveDocument.Bookmarks("LST_311_CONTACTS").Select wrd_DocWord.Selection.InsertAfter " "   Set tbl_MomTableau = wrd_DocWord.ActiveDocument.Tables.Add _ (Range:=Selection.Range, NumRows:=(int_Compteur / 3 + 1), NumColumns:=3)   ' ici le traitement : remplissage du tableau... '...   wrd_DocWord.ActiveDocument.SaveAs App.Path & "\Doc_2.doc"     wrd_DocWord.Quit Set wrd_DocWord = Nothing

---

l'erreur survient lors du

Code:

---

1 2 3

Set tbl_MomTableau = wrd_DocWord.ActiveDocument.Tables.Add _ (Range:=Selection.Range, NumRows:=(int_Compteur / 3 + 1), NumColumns:=3)

---

en cherchant, j'ai vu que pas mal de personne on reconter a peu pres le meme probleme.

merci pour votre aide, j'espere ete claire sur le probleme

J'ai eu le même problème (ou à peu près) et en fait j'y ai remédié en n'ouvrant word qu'une seule fois dans mon appli. En effet j'ai remarqué que si on ouvrait Word, on le quittait puis qu'on le réouvrait de nouveau, le tout dans une appli, il ne voulait pas le réouvrir. Il faut donc, l'ouvrir, n'ouvrir ou ne fermer que les doc, puis lorsque l'on quitte l'application, on ferme word. Et la, ca marche :?.

Si cela interresse certaines personnes, j'ai construit un control pour piloter Word. Celui-ci gère entre autre ce problème. De plus toutes les fonctions sont déjà programmées et sont Intuitives pour l'utilisation.

Allez sur mon site :
http://www.geocities.com/avigeilpro/

merci beaucoup
c vraiment super
j'ai utilisé la petite fonction OLE
ca marche d'enfer!!
encore grand merci :oops:
:P