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);
 }


评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值