Ошибка Сервер RPC недоступен при повторном обращении к Word

[fanat_96]

Здравствуйте. Есть код, который из DataTable и полей формы создает вордовский документ на основе определенного шаблона. Но почему-то после повторного нажатия на кнопку сохранения вылетает ошибка "Сервер RPC недоступен. (Исключение из HRESULT: 0x800706BA)" на строчке кода:

document = application.Documents.Add(ref templatePathObj, ref missingObj, ref missingObj, ref missingObj);

Некоторые переменные пришлось объявить глобально, т.к. они почему-то не распознавались в блоке try-catch, если объявлять их локально. Полный код функции:

DataTable dt_fasad = new DataTable();

Word._Document document;
Word._Application application = new Word.Application();
Object trueObj = true;
Object falseObj = false;
object missingObj = Missing.Value;
object templatePathObj;

private void button2_Click(object sender, EventArgs e)
{
    
    try
    {
        string documentpath = Application.StartupPath.ToString() + "\\act.docx";
        missingObj = Missing.Value;
        templatePathObj = documentpath;
        document = application.Documents.Add(ref templatePathObj, ref missingObj, ref missingObj, ref missingObj);

        
        object bookmarkObj_fio = "z1";
        object bookmarkObj_fioCopy = "z3";
        object bookmarkObj_unp = "z2";
        object bookmarkObj_adres = "z4";
        object bookmarkObj_rs = "z6";
        object bookmarkObj_sum = "z7";
        object bookmarkObj_data = "zData";

        Word.Range bookmarkRange_fio = document.Bookmarks.get_Item(ref bookmarkObj_fio).Range;
        Word.Range bookmarkRange_fioCopy = document.Bookmarks.get_Item(ref bookmarkObj_fioCopy).Range;
        Word.Range bookmarkRange_unp = document.Bookmarks.get_Item(ref bookmarkObj_unp).Range;
        Word.Range bookmarkRange_adres = document.Bookmarks.get_Item(ref bookmarkObj_adres).Range;
        Word.Range bookmarkRange_rs = document.Bookmarks.get_Item(ref bookmarkObj_rs).Range;
        Word.Range bookmarkRange_sum = document.Bookmarks.get_Item(ref bookmarkObj_sum).Range;
        Word.Range bookmarkRange_data = document.Bookmarks.get_Item(ref bookmarkObj_data).Range;

       
        bookmarkRange_fio.Text = textBox2.Text;
        bookmarkRange_unp.Text = textBox3.Text;
        bookmarkRange_fioCopy.Text = textBox2.Text;
        bookmarkRange_fioCopy.Bold = 1;
        bookmarkRange_adres.Text = textBox5.Text;
        bookmarkRange_rs.Text = textBox4.Text;
        bookmarkRange_data.Text = DateTime.Today.ToString("dd.MM.yyyy");

        double summ = 0;
        
        var dtres = dt_fasad.AsEnumerable()
           .GroupBy(t => new
           {
               Id = t.Field<int>("Картридж")
           })
           .Select(g => new
           {
               g.Key.Id,
               Value = String.Join(", ", g.Select(i => i.Field<string>("Проведенные_работы")))
           }).ToList();

        var sumres = dt_fasad.AsEnumerable()
           .GroupBy(t => new
           {
               Id = t.Field<int>("Картридж")
           })
           .Select(g => new
           {
               g.Key.Id,
               Value = g.Sum(s => (s.Field<double>("Общая_цена")))
           }).ToList();

        var res2 =
            from r in dt_fasad.AsEnumerable()
            group r by r["Марка"] into g
            select new
            {
                p = g.Key
            };

        
        int ik = 2;
        int ir = 2;
        Word.Table _table = document.Tables[1]; 
        _table.AllowAutoFit = true;

        foreach (var zap in dtres)
        {
            _table.Rows.Add(ref missingObj);
            Word.Range _currentRange = _table.Cell(ik, 3).Range;
            Word.Range _currentRangeNumb = _table.Cell(ik, 1).Range;
            Word.Range _currentRangeId = _table.Cell(ik, 2).Range;

            _currentRange.Text = zap.Value.ToString();
            _currentRangeNumb.Text = Convert.ToString(ik - 1);
            _currentRangeId.Text = zap.Id.ToString();
            _table.Rows[ik].SetHeight(35, Word.WdRowHeightRule.wdRowHeightAuto);
            ik++;
        }

        foreach (var sumchik in sumres)
        {
            Word.Range _currentRangeCena = _table.Cell(ir, 4).Range;
            Word.Range _currentRangeCenaNoNDS = _table.Cell(ir, 5).Range;
            Word.Range _currentRangeNDS = _table.Cell(ir, 6).Range;
            Word.Range _currentRangeSummaNDS = _table.Cell(ir, 7).Range;
            Word.Range _currentRangeCenaNDS = _table.Cell(ir, 8).Range;

            _currentRangeCena.Text = Math.Round(sumchik.Value, 2).ToString();
            _currentRangeCenaNoNDS.Text = Math.Round(sumchik.Value, 2).ToString();
            summ += Math.Round(sumchik.Value, 2);
            _currentRangeNDS.Text = "Без НДС";
            _currentRangeSummaNDS.Text = "-";
            _currentRangeCenaNDS.Text = Math.Round(sumchik.Value, 2).ToString();
            ir++;

        }
        _table.Rows.Add(ref missingObj);
        _table.Rows[ik].Height = 15;
        _table.Columns[1].SetWidth(25, Word.WdRulerStyle.wdAdjustProportional);
        _table.Columns[2].SetWidth(40, Word.WdRulerStyle.wdAdjustProportional);
        _table.Columns[3].SetWidth(200, Word.WdRulerStyle.wdAdjustProportional);
        _table.Columns[4].SetWidth(30, Word.WdRulerStyle.wdAdjustProportional);
        _table.Columns[5].SetWidth(55, Word.WdRulerStyle.wdAdjustProportional);

        _table.Rows[ik].Cells[2].Merge(_table.Rows[ik].Cells[3]);

        Word.Range _currentObsh = _table.Cell(ik, 2).Range;
        Word.Range _currentCenaObs = _table.Cell(ik, 3).Range;
        Word.Range _currentCenaNoNDS = _table.Cell(ik, 4).Range;
        Word.Range _currentNDSProc = _table.Cell(ik, 5).Range;
        Word.Range _currentSumNDS = _table.Cell(ik, 6).Range;
        Word.Range _currentSOBSHSUm = _table.Cell(ik, 7).Range;

        _currentObsh.Text = "Итого";
        _currentObsh.Bold = 1;

        _currentCenaObs.Text = Math.Round(summ, 2).ToString();
        _currentCenaNoNDS.Text = Math.Round(summ, 2).ToString();
        _currentNDSProc.Text = "x";
        _currentSumNDS.Text = "-";
        _currentSOBSHSUm.Text = Math.Round(summ, 2).ToString();

        bookmarkRange_sum.Text = RusCurrency.Str(summ, "BYN");
        bookmarkRange_sum.Bold = 1;

    
        SaveFileDialog saveFileDialog1 = new SaveFileDialog();
        saveFileDialog1.FileName = "act_na_pechat";
        saveFileDialog1.DefaultExt = ".docx";
        saveFileDialog1.Filter = "Word Documents|*.docx";
        if (saveFileDialog1.ShowDialog() == DialogResult.OK)
        {
            document.SaveAs(saveFileDialog1.FileName, ref missingObj, ref missingObj, ref missingObj, ref missingObj, ref missingObj,
        ref missingObj, ref missingObj, ref missingObj, ref missingObj, ref missingObj,
        ref missingObj, ref missingObj, ref missingObj, ref missingObj, ref missingObj);
        }
        document.Close(Word.WdSaveOptions.wdDoNotSaveChanges);
        application.Quit();
    }
    catch (Exception ex)
    {
        MessageBox.Show("Текст ошибки: "+ ex.Message);
        document.Close(ref falseObj, ref missingObj, ref missingObj);
        application.Quit(ref missingObj, ref missingObj, ref missingObj);
        document = null;
        application = null;
    }
}

Подскажите, пожалуйста, где я мог допустить ошибку. Первый раз работаю с word и по коду должно быть понятно, что нахватался всего по чуть-чуть где только возможно)

[Black Fregat]

Сообщение от fanat_96

Некоторые переменные пришлось объявить глобально

Вот тут Вас засада и подстерегла. Вы объявляете объект глобально и тут же его создаёте. Один раз. А при нажатии на кнопку - закрываете и убиваете.

[fanat_96]

Сообщение от Black Fregat

Вот тут Вас засада и подстерегла. Вы объявляете объект глобально и тут же его создаёте. Один раз. А при нажатии на кнопку - закрываете и убиваете.

А как мне тогда лучше объекты раскидать? Просто если во время печати акта вылетит какая ошибка, то может случиться так, что word будет висеть открытым, в чем я убедился уже разок, когда открыл диспетчер, а там порядка 10 его экземпляров запущено. А так перехват ошибки в catch позволяет его наверняка закрыть.
если переменную document перекинуть внутрь try, то в catch ее не видно.

[fanat_96]

Сообщение от Black Fregat

Один раз

я правильно понимаю, что можно

Word._Application application = new Word.Application();

заменить на

Word._Application application;

а в блоке try добавить:

application = new Word.Application();

Вроде как работает, но не уверен, что именно так нужно)

[Alex11223]

Сообщение от fanat_96

Есть код, который из DataTable и полей формы создает вордовский документ на основе определенного шаблона

Возьмите библиотеку для формата 2007+ офиса (docx) и не парьтесь с COM и запуском целого офиса.

Например https://github.com/xceedsoftware/DocX

[Black Fregat]

Сообщение от fanat_96

Вроде как работает

И прекрасно