zoukankan      html  css  js  c++  java
  • Csharp 简单操作Word模板文件

    1.创建一个模板的Word文档  Doc1.dot 内容为:

    To: <Name>

    Sub:<Subject>

    Website is ok geovindu 涂聚文好样的 work.

    CEo

                             <Datetime>

    Thanks.

    2.程序操作代码为:

           /// <summary>
            /// 簡單操作Word模板文件
            /// 塗聚文 2011-11-03
            /// 缔友计算机信息技术有限公司
            /// </summary>
            /// <param name="sender"></param>
            /// <param name="e"></param>
            private void button2_Click(object sender, EventArgs e)
            {
                DateTime startTime = DateTime.Now;
                DateTime endTime = DateTime.Now;
                System.Random srd = new Random();
                int srdName = srd.Next(1000);
                string newfile = path + DateTime.Now.ToString("yyyyMMddhhmmss") + srdName.ToString()+".doc"; //新文件名         
                try
                {
                    
                    startTime = DateTime.Now;   
                    //killprocess("winword");
                    //  復制模板文件
                    File.Copy(path + fileName, newfile, true);//fileName = "Doc1.doc";//模板文件
                   
                    object missing = Missing.Value;
                    
                    Word.Application wordApp = new Word.ApplicationClass();
                    endTime = DateTime.Now;
                    
                    Word.Document aDoc = null;
                   
                    object file = newfile;//新文件替換                
                    if (File.Exists((string)file))//判斷新文件存在否
                    {
                        object readOnly = false;
                        object isVisible = false;                    
                        wordApp.Visible = false;                    
                        aDoc = wordApp.Documents.Open(ref file, ref missing,
                        ref readOnly, 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);
                        aDoc.Activate();                   
                        this.FindAndReplace(wordApp, "<Datetime>", this.dateTimePicker1.Text);
                        this.FindAndReplace(wordApp, "<Name>", this.textBoxName.Text.Trim());
                        this.FindAndReplace(wordApp, "<Subject>",this.textBoxSubject.Text.Trim());                    
                        aDoc.Save();
                    }
                    else
                        MessageBox.Show("File does not exist.","No File", MessageBoxButtons.OK,MessageBoxIcon.Information);
                   // killprocess("winword");
                }
                catch (Exception)
                {
                    MessageBox.Show("Error in process.", "Internal Error",
                    MessageBoxButtons.OK, MessageBoxIcon.Error);
                }
                finally
                {
                    killprocess(startTime, endTime, "winword");
                    GC.Collect();
                    GC.WaitForPendingFinalizers();
                }
            }
            /// <summary>
            /// 關閉進程 塗聚文 2011-11-03
            /// </summary>
            /// <param name="pro"></param>
            public void killprocess(DateTime start, DateTime end, string ProcessName)
            {
                //foreach (Process p in Process.GetProcessesByName(pro))
                //{
                //    if (!p.HasExited)
                //    {
                //        p.Kill();
                //    }
                //}
                    Process[] myProcesses;
                    DateTime ProStartTime;
                    myProcesses = Process.GetProcessesByName(ProcessName);
    
                    //因为暂时没有想到得到Excel进程ID的方法,所以只能判断进程启动时间
                    foreach (Process myProcess in myProcesses)
                    {
                        ProStartTime = myProcess.StartTime;
                        //myProcess.Id
    
                        if (start <= ProStartTime && ProStartTime <= end)
                        {
                            myProcess.Kill();
                        }
                    }
       
    
            }
            /// <summary>
            /// 找查替換內容 塗聚文 2011-11-03
            /// </summary>
            /// <param name="wordApp"></param>
            /// <param name="findText"></param>
            /// <param name="replaceText"></param>
            private void FindAndReplace(Word.Application wordApp,object findText, object replaceText)
            {
                object matchCase = true;
                object matchWholeWord = true;
                object matchWildCards = false;
                object matchSoundsLike = false;
                object matchAllWordForms = 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 matchAllWordForms, ref forward, ref wrap, ref format,
                    ref replaceText, ref replace, ref matchKashida,
                            ref matchDiacritics,
                    ref matchAlefHamza, ref matchControl);
            }
    
    哲学管理(学)人生, 文学艺术生活, 自动(计算机学)物理(学)工作, 生物(学)化学逆境, 历史(学)测绘(学)时间, 经济(学)数学金钱(理财), 心理(学)医学情绪, 诗词美容情感, 美学建筑(学)家园, 解构建构(分析)整合学习, 智商情商(IQ、EQ)运筹(学)成功.---Geovin Du(涂聚文)
  • 相关阅读:
    自适应网页设计(Responsive Web Design)(转)
    PAT 1062 最简分数(20)(代码+思路)
    PAT 1059 C语言竞赛(20)(代码+思路)
    PAT 1058 选择题(20)(代码+思路)
    PAT 1057 数零壹 (20)(代码+思路)
    PAT 1054 求平均值 (20)(代码+思路+测试用例)
    PAT 1053 住房空置率 (20)(代码+思路)
    PAT 1052 卖个萌 (20)(代码+思路)
    PAT 1048 数字加密(20)(代码+思路)
    PAT 1047 编程团体赛(代码)
  • 原文地址:https://www.cnblogs.com/geovindu/p/2234981.html
Copyright © 2011-2022 走看看