WinWord.exe не выйдет после вызова Word. Документы. Добавьте - Word.NET Interop

Не следует отбрасывать объект документа, созданный в Word.Documents.Add . Сохраните и вызовите Marshal.ReleaseComObject для каждого COM-объекта, полученного в результате автоматизации, когда вы закончите, то есть , если вы нигде не кэшируете объекты .

Я выполнял только автоматизацию Excel, но сталкивался с аналогичными проблемами. Ссылаясь на старый код, последний шаг закрытия имеет строку GC.Collect ()

Эта статья также упоминает его: http://support.microsoft.com/kb/317109

есть ли в oDocuments метод .Dispose () или .Close ()? вы избавляетесь от двух других, но не от этого.

Вы пробовали изменить

oWord.Visible = False

на

oWord.Visible = True

?

Я спрашиваю, потому что Word может просить вас сделать что-то, связанное с этим шаблон, который вы пытаетесь использовать. Если он думает, что отображается диалоговое окно, он обычно не закрывается. IIRC, есть способ сделать Quit, чтобы он принудительно выходил и не ждал никаких диалогов. Но это было давно.

Хотя это C #, но, возможно, он вам поможет. Я использую этот метод для объединения нескольких документов в один. Я передаю все документы в Arraylist, и Word, кажется, закрывается правильно, когда закончил.

 public static void documentsMerge(object fileName, ArrayList arrayList) {
        // object fileName = Path.Combine(Environment.CurrentDirectory, @"NewDocument.doc");
        File.Delete(fileName.ToString());
        try {
            wordApplication = new ApplicationClass();
            var doc = wordApplication.Documents.Add(ref missing, ref missing, ref missing, ref missing);
            try {
                doc.Activate();
                int count = 0;
                foreach (var alItem in arrayList) {
                    addDocument(alItem, doc, count == 0);
                    count++;
                }
               // addDocument(@"D:\Projects\WordTests\ConsoleApplication1\Documents\Doc1.doc", doc ) ; //, false);
               // addDocument(@"D:\Projects\WordTests\ConsoleApplication1\Documents\Doc2.doc", doc ) ; //, true);
                doc.SaveAs(ref fileName, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing);
            } finally {
                doc.Close(ref missing, ref missing, ref missing);
            }
        } finally {
            wordApplication.Quit(ref missing, ref missing, ref missing);
        }
    }

Блок finally полезен для очистки любых ресурсов, выделенных в блоке try, а также для запуска любого кода, который должен выполняться, даже если есть исключение. Управление всегда передается блоку finally, независимо от того, как завершается блок try.

Так что попробуйте поместить свой код в блок try / finally и посмотреть, как он тогда себя ведет?

Для VB.NET

Try
' Statement which can cause an exception.
Catch x As Type
' Statements for handling the exception
Finally
End Try 'Any cleanup code

Попробуйте вызвать GC.WaitForPendingFinalizers() и использовать Marshal.FinalReleaseComObject вместо Marshal.ReleaseComObject. Это избавит вас от необходимости выполнять цикл.

Обновите свой код и попробуйте (вызовы GC специально находятся в начале):

GC.Collect()
GC.WaitForPendingFinalizers()

oDoc.Close()
Marshal.FinalReleaseComObject(oDoc)

Marshal.FinalReleaseComObject(oDocuments)

oWord.Quit()
Marshal.FinalReleaseComObject(oWord)

Вы также можете проверить этот связанный вопрос, обсуждающий проблему для Excel.

У меня возникла та же проблема, когда я это делал:

object missing = System.Reflection.Missing.Value;
wordApplication.Quit(ref missing, ref missing, ref missing);

Я решил так:

object objFalse = false;
wordApplication.Quit(ref objFalse, ref objFalse, ref objFalse);

Не спрашивайте меня, почему автоматизация офиса приключение :)

(Все мои советы адаптированы из этого ответа о взаимодействии с Excel.)

Здесь есть несколько важных вещей:

1) Никогда не используйте 2 точки на одной линии. Также считайте индексатор точкой

Хорошо

Word.Documents d = wordApp.Documents;
Word.Document aDoc = d.Open(/*...*/);

ПЛОХО

Word.Document aDoc = wordApp.Documents.Open(/*...*/);

2) Освободите все ваши указатели.

3) Нет, действительно, вернитесь и отпустите все свои указатели, вы где-то пропустили один (или, по крайней мере, я всегда так делаю).

Вот полный пример того, что НАКОНЕЦ сработало для меня в одном проекте после долгих стенаний и скрежета зубами:

object m = Missing.Value;
// this must be an object, not a string. if you forget though,
// intellisense will remind you
object oFilename = @"C:\my sheet.doc";

object readOnly = false;
object isVisible = false;

Word.Application wordApp = new Word.ApplicationClass();
wordApp.Visible = false;
// remember: don't use 2 dots on 1 line
Word.Documents d = wordApp.Documents;
Word.Document aDoc = d.Open(ref oFilename, ref m, ref readOnly, ref m,
    ref m, ref m, ref m, ref m, ref m, ref m, ref m, ref isVisible,
    ref m, ref m, ref m, ref m);
aDoc.Activate();

object findText = "my old value";
object replaceText = "new and improved value";

object oTrue = true;
object oFalse = false;
object replace = 2;
object wrap = 1;

Word.Selection s = wordApp.Selection;
Word.Find f = s.Find;
f.Execute(ref findText, ref oTrue,
    ref oTrue, ref oFalse, ref oFalse,
    ref oFalse, ref oTrue, ref wrap, ref oFalse,
    ref replaceText, ref replace, ref oFalse, ref oFalse,
    ref oFalse, ref oFalse);

aDoc.SaveAs(ref oFilename, ref m, ref m, ref m, ref m, ref m, ref m,
    ref m, ref m, ref m, ref m, ref m, ref m, ref m, ref m, ref m);

object doNotSaveChanges = Word.WdSaveOptions.wdDoNotSaveChanges;
// casting here because intellisense complained of ambiguity
(aDoc as Word._Document).Close(ref doNotSaveChanges, ref m, ref m);

// release each in the reverse of the order in which it was first used
// ReleaseComObject might also work as well. I haven't tested yet
Marshal.FinalReleaseComObject(f);
Marshal.FinalReleaseComObject(s);
Marshal.FinalReleaseComObject(aDoc);
Marshal.FinalReleaseComObject(d);

// must quit app before releasing
// again: casting because intellisense complained of ambiguity
(wordApp as Word._Application).Quit(ref m, ref m, ref m);
Marshal.FinalReleaseComObject(wordApp);