字符串参数太长。从数据库检索数据到word模板

时间:2014-05-27 02:53:03

标签: c# visual-studio-2010

我正在尝试从word数据库中的表中检索一些数据,并在word文档中检索FindandReplace。我得到"字符串参数太长" WordApp.Selection.Find.Execute方法出错。请帮忙!

private void btnML_Click(object sender,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);
    }

2 个答案:

答案 0 :(得分: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;//****
    }
}

Checkout Here

答案 1 :(得分: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();
        }
    }
}