C#如何打开word(2003)文件 请高手指点一二问题解决马上给分 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 这个在RicgTextBox里面就能显示出来,用OpenFileDialg类提示打开就可以了。 1 安装 offilce2 com 下引用 Microsoft Word 11.0 Object Library3 using Word;Word.Document~~~~~~ http://www.cntuba.com/developer/csharp2/200701/20070101034304_19363.html 2楼的方法适用于WinForm3楼的是通用方法,使用微软的com类 C#实现对Word文件读写 手头上的一个项目报表相对比较简单,所以报表打印采用VBA引擎,通过定制Word模版,然后根据模版需要填充数据,然后OK,打印即可。 实现方法:首先需要引用VBA组建,我用的是Office2003 Professional,Dll版本号为Microsoft Word11.0, 另外当然还需要引用Interop.Word.Dll. 代码如下: #region 打开Word文档,并且返回对象wDoc,wDoc /// <summary> /// 打开Word文档,并且返回对象wDoc,wDoc /// </summary> /// <param name="FileName">完整Word文件路径+名称</param> /// <param name="wDoc">返回的Word.Document wDoc对象</param> /// <param name="WApp">返回的Word.Application对象</param> public static void CreateWordDocument(string FileName,ref Word.Document wDoc,ref Word.Application WApp) { if(FileName == "") return; Word.Document thisDocument = null; Word.FormFields formFields = null; Word.Application thisApplication = new Word.ApplicationClass(); thisApplication.Visible = true; thisApplication.Caption = ""; thisApplication.Options.CheckSpellingAsYouType = false; thisApplication.Options.CheckGrammarAsYouType = false; Object filename = FileName; Object ConfirmConversions = false; Object ReadOnly = true; Object AddToRecentFiles = false; Object PasswordDocument = System.Type.Missing; Object PasswordTemplate = System.Type.Missing; Object Revert = System.Type.Missing; Object WritePasswordDocument = System.Type.Missing; Object WritePasswordTemplate = System.Type.Missing; Object Format = System.Type.Missing; Object Encoding = System.Type.Missing; Object Visible = System.Type.Missing; Object OpenAndRepair = System.Type.Missing; Object DocumentDirection = System.Type.Missing; Object NoEncodingDialog = System.Type.Missing; Object XMLTransform = System.Type.Missing; try { Word.Document wordDoc = thisApplication.Documents.Open(ref filename, ref ConfirmConversions, ref ReadOnly, ref AddToRecentFiles, ref PasswordDocument, ref PasswordTemplate, ref Revert,ref WritePasswordDocument, ref WritePasswordTemplate, ref Format, ref Encoding, ref Visible, ref OpenAndRepair, ref DocumentDirection, ref NoEncodingDialog, ref XMLTransform ); thisDocument = wordDoc; wDoc = wordDoc; WApp = thisApplication; formFields = wordDoc.FormFields; } catch(Exception ex) { MessageBox.Show(ex.Message); } } #endregion 调用上面静态方法,打开目标文件并且把DataGrid中数据填充到对应Word标签中去 #region Word填充数据(For Example) /// <summary> /// Word填充数据 /// </summary> private void WordLoadData() { Word.Document wDoc=null; Word.Application wApp=null; sysFun.CreateWordDocument("E:\\监测报告(new).dot",ref wDoc,ref wApp); //对标签"C"进行填充 object bkmC="C"; if(wApp.ActiveDocument.Books.Exists("C") == true) { wApp.ActiveDocument.Books.get_Item (ref bkmC).Select(); } wApp.Selection.TypeText(this.txt1.Text); object bkmG = "TWaterTable3"; object unit; object count; //移动数 object extend; extend = Word.WdMovementType.wdExtend; unit = Word.WdUnits.wdCell; //把DataGrid中数据填充到标签TWaterTable3上 if(wApp.ActiveDocument.Books.Exists("TWaterTable3") == true) { wApp.ActiveDocument.Books.get_Item (ref bkmG).Select(); for(int i=0;i<this.gridEX1.RecordCount;i++) { if(i==0) { count=1; } else { count=0; } //需填充5列数据 wApp.Selection.Move(ref unit,ref count); wApp.Selection.TypeText(gridEX1.GetRow(i).Cells[0].Text); count=1; wApp.Selection.Move(ref unit,ref count); wApp.Selection.TypeText(gridEX1.GetRow(i).Cells[1].Text); wApp.Selection.Move(ref unit,ref count); wApp.Selection.TypeText(gridEX1.GetRow(i).Cells[2].Text); wApp.Selection.Move(ref unit,ref count); wApp.Selection.TypeText(gridEX1.GetRow(i).Cells[3].Text); wApp.Selection.Move(ref unit,ref count); wApp.Selection.TypeText(gridEX1.GetRow(i).Cells[4].Text); //换行 wApp.Selection.MoveRight(ref unit,ref count,ref extend); } } } #endregion 求解:如何实时调用今天的日期 最近太无聊,打算做个QQ农场外挂,请高手们帮忙... windows search Options问题! 在这儿求个正则匹配的写法?在线等! 求聊天工具视频源代码 如何用WMI取得STAT接口硬盘的序列号(SerialNumber) 20分求解:如何将一个dataview转换成一个datatable? 怎么更改文件名? 谁能够找到.net部署相关信息及部署参数啊,郁闷了好久了,55555 线程数与处理器的关系,线程调度 询问一个学习C#最好的办法 请各位有经验的专业人士给点建议
2 com 下引用 Microsoft Word 11.0 Object Library
3 using Word;
Word.Document~~~~~~
3楼的是通用方法,使用微软的com类
C#实现对Word文件读写
手头上的一个项目报表相对比较简单,所以报表打印采用VBA引擎,通过定制Word模版,然后根据模版需要填充数据,然后OK,打印即可。 实现方法:首先需要引用VBA组建,我用的是Office2003 Professional,Dll版本号为Microsoft Word11.0, 另外当然还需要引用Interop.Word.Dll. 代码如下: #region 打开Word文档,并且返回对象wDoc,wDoc
/// <summary>
/// 打开Word文档,并且返回对象wDoc,wDoc
/// </summary>
/// <param name="FileName">完整Word文件路径+名称</param>
/// <param name="wDoc">返回的Word.Document wDoc对象</param>
/// <param name="WApp">返回的Word.Application对象</param>
public static void CreateWordDocument(string FileName,ref Word.Document wDoc,ref Word.Application WApp)
{
if(FileName == "") return;
Word.Document thisDocument = null;
Word.FormFields formFields = null;
Word.Application thisApplication = new Word.ApplicationClass();
thisApplication.Visible = true;
thisApplication.Caption = "";
thisApplication.Options.CheckSpellingAsYouType = false;
thisApplication.Options.CheckGrammarAsYouType = false; Object filename = FileName;
Object ConfirmConversions = false;
Object ReadOnly = true;
Object AddToRecentFiles = false; Object PasswordDocument = System.Type.Missing;
Object PasswordTemplate = System.Type.Missing;
Object Revert = System.Type.Missing;
Object WritePasswordDocument = System.Type.Missing;
Object WritePasswordTemplate = System.Type.Missing;
Object Format = System.Type.Missing;
Object Encoding = System.Type.Missing;
Object Visible = System.Type.Missing;
Object OpenAndRepair = System.Type.Missing;
Object DocumentDirection = System.Type.Missing;
Object NoEncodingDialog = System.Type.Missing;
Object XMLTransform = System.Type.Missing; try
{
Word.Document wordDoc =
thisApplication.Documents.Open(ref filename, ref ConfirmConversions,
ref ReadOnly, ref AddToRecentFiles, ref PasswordDocument, ref PasswordTemplate,
ref Revert,ref WritePasswordDocument, ref WritePasswordTemplate, ref Format,
ref Encoding, ref Visible, ref OpenAndRepair, ref DocumentDirection,
ref NoEncodingDialog, ref XMLTransform );
thisDocument = wordDoc;
wDoc = wordDoc;
WApp = thisApplication;
formFields = wordDoc.FormFields;
}
catch(Exception ex)
{
MessageBox.Show(ex.Message);
}
}
#endregion
调用上面静态方法,打开目标文件并且把DataGrid中数据填充到对应Word标签中去
#region Word填充数据(For Example)
/// <summary>
/// Word填充数据
/// </summary>
private void WordLoadData()
{
Word.Document wDoc=null;
Word.Application wApp=null;
sysFun.CreateWordDocument("E:\\监测报告(new).dot",ref wDoc,ref wApp); //对标签"C"进行填充
object bkmC="C";
if(wApp.ActiveDocument.Books.Exists("C") == true)
{
wApp.ActiveDocument.Books.get_Item
(ref bkmC).Select();
}
wApp.Selection.TypeText(this.txt1.Text);
object bkmG = "TWaterTable3";
object unit;
object count; //移动数
object extend;
extend = Word.WdMovementType.wdExtend;
unit = Word.WdUnits.wdCell;
//把DataGrid中数据填充到标签TWaterTable3上
if(wApp.ActiveDocument.Books.Exists("TWaterTable3") == true)
{
wApp.ActiveDocument.Books.get_Item
(ref bkmG).Select(); for(int i=0;i<this.gridEX1.RecordCount;i++)
{
if(i==0)
{
count=1;
}
else
{
count=0;
}
//需填充5列数据
wApp.Selection.Move(ref unit,ref count);
wApp.Selection.TypeText(gridEX1.GetRow(i).Cells[0].Text);
count=1;
wApp.Selection.Move(ref unit,ref count);
wApp.Selection.TypeText(gridEX1.GetRow(i).Cells[1].Text);
wApp.Selection.Move(ref unit,ref count);
wApp.Selection.TypeText(gridEX1.GetRow(i).Cells[2].Text);
wApp.Selection.Move(ref unit,ref count);
wApp.Selection.TypeText(gridEX1.GetRow(i).Cells[3].Text);
wApp.Selection.Move(ref unit,ref count);
wApp.Selection.TypeText(gridEX1.GetRow(i).Cells[4].Text);
//换行
wApp.Selection.MoveRight(ref unit,ref count,ref extend);
}
}
}
#endregion