最近一個項目的需求是要根據一個Word文檔的模板,用記錄集的具體內容替換掉裏面的標識字符的內容,生成不同的文檔。
分兩步:
第一:複製模板的內容到一個Document對象裏從源DOC文檔複製內容返回一個Document類#region 從源DOC文檔複製內容返回一個Document類
/// <summary>
/// 從源DOC文檔複製內容返回一個Document類
/// </summary>
/// <param name="sorceDocPath">源DOC文檔路徑</param>
/// <returns>Document</returns>
protected Document copyWordDoc(object sorceDocPath)
{
object objDocType = WdDocumentType.wdTypeDocument;
object type = WdBreakType.wdSectionBreakContinuous;
//Word應用程序變量
Application wordApp;
//Word文檔變量
Document newWordDoc;
object readOnly = false;
object isVisible = false;
//初始化
//由於使用的是COM庫,因此有許多變量需要用Missing.Value代替
wordApp = new ApplicationClass();
Object Nothing = System.Reflection.Missing.Value;
//wordDoc = wordApp.Documents.Add(ref Nothing, ref Nothing, ref Nothing, ref Nothing);
newWordDoc = wordApp.Documents.Add(ref Nothing, ref Nothing, ref Nothing, ref Nothing);
Document openWord;
openWord = wordApp.Documents.Open(ref sorceDocPath, ref Nothing, ref readOnly, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref isVisible, ref Nothing, ref Nothing, ref Nothing, ref Nothing);
openWord.Select();
openWord.Sections[1].Range.Copy();
object start = 0;
Range newRang = newWordDoc.Range(ref start, ref start);
//插入換行符
//newWordDoc.Sections[1].Range.InsertBreak(ref type);
newWordDoc.Sections[1].Range.PasteAndFormat(WdRecoveryType.wdPasteDefault);
openWord.Close(ref Nothing, ref Nothing, ref Nothing);
return newWordDoc;
}
#endregion第二:替換複製好內容的Document的標識字符替換指定Document的內容,並保存到指定的路徑#region 替換指定Document的內容,並保存到指定的路徑
/// <summary>
/// 替換指定Document的內容,並保存到指定的路徑
/// </summary>
/// <param name="docObject">Document</param>
/// <param name="savePath">保存到指定的路徑</param>
protected void ReplaceWordDocAndSave(Document docObject, object savePath)
{
object format = WdSaveFormat.wdFormatDocument;
object readOnly = false;
object isVisible = false;
string strOldText = "{WORD}";
string strNewText = "{替換後的文本}";
List<string> IListOldStr = new List<string>();
IListOldStr.Add("{WORD1}");
IListOldStr.Add("{WORD2}");
Object Nothing = System.Reflection.Missing.Value;
Microsoft.Office.Interop.Word.Application wordApp = new ApplicationClass();
//Microsoft.Office.Interop.Word.Document oDoc = wordApp.Documents.Open(ref obj, ref Nothing, ref readOnly, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref isVisible, ref Nothing, ref Nothing, ref Nothing, ref Nothing);
Microsoft.Office.Interop.Word.Document oDoc = docObject;
object FindText, ReplaceWith, Replace;
object MissingValue = Type.Missing;
foreach (string str in IListOldStr)
{
oDoc.Content.Find.Text = str;
//要查找的文本
FindText = str;
//替換文本
ReplaceWith = strNewText;
//wdReplaceAll - 替換找到的所有項。
//wdReplaceNone - 不替換找到的任何項。
//wdReplaceOne - 替換找到的第一項。
Replace = Microsoft.Office.Interop.Word.WdReplace.wdReplaceAll;
//移除Find的搜索文本和段落格式設置
oDoc.Content.Find.ClearFormatting();
if (oDoc.Content.Find.Execute(ref FindText, ref MissingValue, ref MissingValue, ref MissingValue, ref MissingValue, ref MissingValue, ref MissingValue, ref MissingValue, ref MissingValue, ref ReplaceWith, ref Replace, ref MissingValue, ref MissingValue, ref MissingValue, ref MissingValue))
{
Response.Write("替換成功!");
Response.Write("<br>");
}
else
{
Response.Write("沒有相關要替換的:(" + str + ")字符");
Response.Write("<br>");
}
}
oDoc.SaveAs(ref savePath, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing);
//關閉wordDoc文檔對象
oDoc.Close(ref Nothing, ref Nothing, ref Nothing);
//關閉wordApp組件對象
wordApp.Quit(ref Nothing, ref Nothing, ref Nothing);
}
#endregion用到了C#操作WORD的複製,替換,和創建WORD文檔的知識。