Строковый параметр слишком длинный. извлечение данных из базы данных в шаблон слова

1

Я пытаюсь получить некоторые данные из таблицы в базе данных sql и FindandReplace в текстовом документе. Я получаю "строковый параметр слишком долго" в методе WordApp.Selection.Find.Execute.Пожалуйста, помогите!

private void btnML_Click (отправитель объекта, EventArgs e) {

        richTextBox2.Visible = true;
        this.btnML.Visible = true;



        String Template;

        SaveFileDialog saveFileDialog1 = new SaveFileDialog();

        saveFileDialog1.Title = "Save Management Letter";


        saveFileDialog1.Filter = "Microsoft word Format (*.docx)|*.doc";


        saveFileDialog1.ShowDialog();


        NewFileName = saveFileDialog1.FileName.ToString();

        Template = @"C:\Users\czu_ecu\Desktop\OAG-WORK\Management Letter Template_new.docx";

        CreateWordDocument(Template,
                       NewFileName);       

    }


    protected String Findings, Implication, Recommendation, ManagementComment, Person, CDate;




    private void CreateWordDocument(object fileName,
                                    object saveAs)
    {





        String sqlQueryfinding =  "Select [Findings_ID]  ,[AU_ID]  ,[Findings_No] ,[Findings_Title] ,[Findings_Rating]  ,[Findings_Description] ,[Findings_Implication] ,[Findings_Recomendation] ,[Findings_ManagementComment]  ,[Findings_ManagerResponsible] ,[Findings_CompletionDate] ,[FSC_ID]   ,[Findings_Status] from Findings Where AU_ID = 173";;    
        SqlCommand cmd = new SqlCommand(sqlQueryfinding, Con.main_connect());

        //sqlData Reader Object to Read the Value returned from query
        SqlDataReader Dr = cmd.ExecuteReader();

        //Set Missing Value parameter - used to represent
        // a missing value when calling methods through
        // interop.
        object missing = System.Reflection.Missing.Value;

        //Setup the Word.Application class.


        Microsoft.Office.Interop.Word.Application wordApp = new Microsoft.Office.Interop.Word.Application();

        //Setup our Word.Document class we'll use.
        Word.Document aDoc = null;


        // Check to see that file exists

        DateTime today = DateTime.Now;

        object readOnly = false;
        object isVisible = false;

        //Set Word to be not visible.
        wordApp.Visible = false;

        //Open the word document

        aDoc = wordApp.Documents.Open(ref fileName, ref missing,
            false, ref missing, ref missing, ref missing,
            ref missing, ref missing, ref missing, ref missing,
            ref missing, ref isVisible, ref missing, ref missing,
            ref missing, ref missing);



        // Activate the document
        aDoc.Activate();

        while (Dr.Read())
        {

            // Find Place Holders and Replace them with Values.
            this.FindAndReplace(wordApp, "<Finding>", Dr[3].ToString());
            this.FindAndReplace(wordApp, "<FindingDescription>", Dr[5].ToString());
            this.FindAndReplace(wordApp, "<ImplicationRating>", Dr[4].ToString());
            this.FindAndReplace(wordApp, "<Recommendation>", Dr[7].ToString());
            this.FindAndReplace(wordApp, "<ManagementComment>", Dr[8].ToString());
            this.FindAndReplace(wordApp, "<ResponsiblePerson>", Dr[9].ToString());
            this.FindAndReplace(wordApp, "<CompletionDate>", Dr[10].ToString());
        }


        //Example of writing to the start of a document.
        // aDoc.Content.InsertBefore("This is at the beginning\r\n\r\n");

        //Example of writing to the end of a document.
        // aDoc.Content.InsertAfter("\r\n\r\nThis is at the end");


        //Save the document as the correct file name.


        try
        {

            aDoc.SaveAs(ref saveAs,
                     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);
        }

        catch (Exception e)
        {
            // MessageBox.Show(e.ToString());
            MessageBox.Show("Management Letter Created", "Success", MessageBoxButtons.OK, MessageBoxIcon.Information);
        }

        //Close the document - you have to do this.
        aDoc.Close(ref missing, ref missing, ref missing);

        CloseConnection();
        MessageBox.Show("Management Letter Created", "Success", MessageBoxButtons.OK, MessageBoxIcon.Information);
    }





     private void FindAndReplace(Word.Application WordApp,
                               object findText,
                               object replaceWithText)
    {
        object matchCase = true;
        object matchWholeWord = true;
        object matchWildCards = false;
        object matchSoundsLike = false;
        object nmatchAllWordForms = false;
        object forward = true;
        object format = false;
        object matchKashida = false;
        object matchDiacritics = false;
        object matchAlefHamza = false;
        object matchControl = false;
        object read_only = false;
        object visible = true;
        object replace = 2;
        object wrap = 1;

        WordApp.Selection.Find.Execute(
            ref findText, 
            ref matchCase, 
            ref matchWholeWord, 
            ref matchWildCards, 
            ref matchSoundsLike,  
            ref nmatchAllWordForms, 
            ref forward, 
            ref wrap, 
            ref format, 
            ref replaceWithText, 
            ref replace, 
            ref matchKashida, 
            ref  matchDiacritics, 
            ref matchAlefHamza , ref matchControl);
    }
Теги:
visual-studio-2010

2 ответа

3

при замене заменяемого текста не будет превышать 255, вместо этого вы можете выбрать текст для замены, а затем изменить текст выделения.

public static void ReplaceTextInWordDoc(Object findMe, Object replaceMe, ApplicationClass app)
{
    object replaceAll = Word.WdReplace.wdReplaceAll;
    object missing = System.Reflection.Missing.Value;
    app.Application.Selection.Find.ClearFormatting();
    app.Application.Selection.Find.Text = (string)findMe;
    app.Application.Selection.Find.Replacement.ClearFormatting();

    if (replaceMe.ToString().Length < 256) // Normal execution
    {
        app.Application.Selection.Find.Replacement.Text = (string)replaceMe;
        app.Application.Selection.Find.Execute(
        ref missing, ref missing, ref missing, ref missing, ref missing,
        ref missing, ref missing, ref missing, ref missing, ref missing,
        ref replaceAll, ref missing, ref missing, ref missing, ref missing);
    }
    else  // Some real simple logic!!
    {
        app.Application.Selection.Find.Execute(
        ref findMe, 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);

        // the area where the findMe is located in the Document is selected.
        // Hence when you execute the statement below the replaceMe string is
        // placed in the area selected, which is what we wanted!

        app.Application.Selection.Text = (string)replaceMe;//****
    }
}

Оформить заказ здесь

  • 0
    я должен заменить весь FindAndReplace этим методом (ReplaceTextInWordDoc) ??
  • 0
    Как передать серию входов и их выходов, используя этот метод.
Показать ещё 2 комментария
1

В дополнение к Will Wu ответ - он был слегка изменен, и он, как будто это действительно сработало для меня.

public static void ReplaceTextInWordDoc(Object findMe, Object replaceMe,   ApplicationClass app) {
    object replaceAll = Word.WdReplace.wdReplaceAll;
    object missing = System.Reflection.Missing.Value;
    app.Application.Selection.Find.ClearFormatting();
    app.Application.Selection.Find.Text = (string)findMe;
    app.Application.Selection.Find.Replacement.ClearFormatting();

    if (replaceMe.ToString().Length < 256) {
        app.Application.Selection.Find.Replacement.Text = (string)replaceMe;
        app.Application.Selection.Find.Execute(
        ref missing, ref missing, ref missing, ref missing, ref missing,
        ref missing, ref missing, ref missing, ref missing, ref missing,
        ref replaceAll, ref missing, ref missing, ref missing, ref missing);
    } else {
        //this cycle do replacing for EVERY example of 'findMe'text.
        while(app.Application.Selection.Find.Execute(
              ref findMe, 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)){

            app.Application.Selection.Text = (string)replaceMe;
            app.Application.Selection.Collapse();
        }
    }
}

Ещё вопросы

Сообщество Overcoder
Наверх
Меню