学步园

这篇本来想写点dosframer的内容和word2003的一些格式,插入方面的内容,但总感到很凌乱.怕写不好
想来想去,要转gis方面了.以后不知道什么时候有时间写office方面的.
所以这里把关于word2003在c#下编程最后点内容献给大家,不足之处,日后增补.
 

1.关于dsoframer.
  这是个不错的东东,可以把自己生成的文档用dsoframer打开打印编辑保存.
  具体大家看看http://support.microsoft.com/kb/311765/zh-cn
  里面有详细的例子.需要在项目中实现office或html编辑的朋友可以参考.网上资料说明很多.
  会c++的朋友还可以扩展.这1点是我极力推荐的原因.

2.关于在word文档中插入图表的问题.
  因为graph是个独立的东东,所以要添加引用.
using Microsoft.Office.Interop.Graph;

//插入图表<br /> //strbookmark-要插入图表的书签名字<br /> //dt-图表的数据<br /> //ChartType-是图表类型<br /> //public Microsoft.Office.Interop.Graph.XlChartType ChartType = Microsoft.Office.Interop.Graph.XlChartType.xl3DPie;<br /> private void InsertGraphtoBookmark(string strbookmark,System.Data.DataTable dt,ref Microsoft.Office.Interop.Word.Document wDoc, ref Microsoft.Office.Interop.Word.Application WApp)<br /> {<br /> int i, j;</p> <p> object missing = System.Reflection.Missing.Value;</p> <p> object oClassType = "MSGraph.Chart.8";<br /> //获取书签对象,换句话,把光标移过来<br /> object bookmark = strbookmark;<br /> WApp.ActiveDocument.Bookmarks.get_Item(ref bookmark).Select();</p> <p> //WApp.Selection.InlineShapes[0].OLEFormat.Open();<br /> //初始化一张图表<br /> Microsoft.Office.Interop.Graph.Chart wdChart =<br /> (Microsoft.Office.Interop.Graph.Chart)WApp.Selection.InlineShapes.AddOLEObject(ref oClassType, ref missing,<br /> ref missing, ref missing, ref missing,<br /> ref missing, ref missing, ref missing).OLEFormat.Object;<br /> //wrdChart.Application.Visible = false;</p> <p> //改变图表格式<br /> wdChart.ChartType =ChartType;</p> <p> wdChart.Application.PlotBy = Microsoft.Office.Interop.Graph.XlRowCol.xlColumns;//根据Y轴来画图表</p> <p> Microsoft.Office.Interop.Graph.Axis axis = (Microsoft.Office.Interop.Graph.Axis)wdChart.Axes(1, 1);//设置X轴的属性<br /> wdChart.Application.DataSheet.Cells.Clear();//清空表格的初始数据</p> <p> //填充图表数据,起始的行号和列号都是1<br /> for (i = 0; i < dt.Columns.Count; i++)//初始化列名<br /> {<br /> wdChart.Application.DataSheet.Cells[1, i + 1] = dt.Columns[i].ColumnName;<br /> }</p> <p> for (i = 0; i < dt.Rows.Count; i++)//填充数据<br /> {<br /> for (j = 0; j < dt.Columns.Count; j++)<br /> {<br /> wdChart.Application.DataSheet.Cells[i + 2, j + 1] = dt.Rows[i][j].ToString();<br /> }<br /> }</p> <p> //axis.MaximumScale = 1;//X轴最大刻度<br /> //axis.MajorUnit = 0.1;</p> <p> wdChart.Legend.Delete();<br /> wdChart.Width = 500;</p> <p> //wrdChart.Height = 666;<br /> //oShape.Height = oWord.InchesToPoints(3.57f);</p> <p> //更新图表并保存退出<br /> wdChart.Application.Update();<br /> wdChart.Application.Quit();<br /> }<br />

3.给文档添加背景
文档背景添加可以采用插入图片方式,把图片放到文字下面去.模拟的盖章就可以这样处理.
我这里是个整个文档加上默认背景.不过效果出不来,vb版本没问题,郁闷ing
//背景<br /> private void FillBackground(ref Microsoft.Office.Interop.Word.Document wDoc, ref Microsoft.Office.Interop.Word.Application WApp)<br /> {<br /> WApp.ActiveDocument.Background.Fill.Visible = Microsoft.Office.Core.MsoTriState.msoTrue;<br /> WApp.ActiveDocument.Background.Fill.ForeColor.RGB =<br /> System.Drawing.ColorTranslator.ToWin32(System.Drawing.Color.FromArgb(94, 158, 255));<br /> WApp.ActiveDocument.Background.Fill.BackColor.RGB =<br /> System.Drawing.ColorTranslator.ToWin32(System.Drawing.Color.FromArgb(25, 235, 250));<br /> WApp.ActiveDocument.Background.Fill.Transparency = float.Parse("0.6");<br /> WApp.ActiveDocument.Background.Fill.PresetGradient(<br /> Microsoft.Office.Core.MsoGradientStyle.msoGradientHorizontal,1,<br /> Microsoft.Office.Core.MsoPresetGradientType.msoGradientDaybreak);<br /> }

4.水印.
  当然插入艺术字也可以.不过2者不一样.水印是针对整个文档,每一页多有.
  这样,把给用户的打印模板全+上水印,没授权水印一直存在.当然用户文档的等级也一目了然

//水印<br /> private void SetWatermark(ref Microsoft.Office.Interop.Word.Document wDoc, ref Microsoft.Office.Interop.Word.Application WApp)<br /> {<br /> object missing = System.Reflection.Missing.Value;<br /> WApp.ActiveDocument.Sections[1].Range.Select();<br /> //这个不能少了,少了水印出不来了<br /> WApp.ActiveWindow.ActivePane.View.SeekView = Microsoft.Office.Interop.Word.WdSeekView.wdSeekCurrentPageHeader;<br /> //给文档全部+上水印<br /> WApp.Selection.HeaderFooter.Shapes.AddTextEffect(<br /> Microsoft.Office.Core.MsoPresetTextEffect.msoTextEffect10,<br /> "请勿带出", "Arial Black", 24, Microsoft.Office.Core.MsoTriState.msoFalse,<br /> Microsoft.Office.Core.MsoTriState.msoFalse, 0, 0, ref missing).Select(ref missing);<br /> //文档中加入艺术字<br /> //WApp.ActiveDocument.Shapes.AddTextEffect(Microsoft.Office.Core.MsoPresetTextEffect.msoTextEffect10,<br /> // "请勿带出", "Arial Black", 24, Microsoft.Office.Core.MsoTriState.msoFalse,<br /> // Microsoft.Office.Core.MsoTriState.msoFalse, 0, 0, ref missing).Select(ref missing);<br /> WApp.Selection.ShapeRange.Name = "PowerPlusWaterMarkObject1";<br /> WApp.Selection.ShapeRange.TextEffect.NormalizedHeight = Microsoft.Office.Core.MsoTriState.msoFalse;<br /> WApp.Selection.ShapeRange.Line.Visible = Microsoft.Office.Core.MsoTriState.msoFalse;<br /> WApp.Selection.ShapeRange.Fill.Visible = Microsoft.Office.Core.MsoTriState.msoTrue;<br /> WApp.Selection.ShapeRange.Fill.Solid();<br /> WApp.Selection.ShapeRange.Fill.ForeColor.RGB =<br /> System.Drawing.ColorTranslator.ToWin32(System.Drawing.Color.ForestGreen);<br /> WApp.Selection.ShapeRange.Fill.Transparency =float.Parse("0.5");<br /> WApp.Selection.ShapeRange.Rotation = 315;<br /> WApp.Selection.ShapeRange.LockAspectRatio = Microsoft.Office.Core.MsoTriState.msoTrue;<br /> WApp.Selection.ShapeRange.Height =WApp.CentimetersToPoints(float.Parse("4.13"));<br /> WApp.Selection.ShapeRange.Width = WApp.CentimetersToPoints(float.Parse("16.52"));<br /> WApp.Selection.ShapeRange.WrapFormat.AllowOverlap =-1;<br /> WApp.Selection.ShapeRange.WrapFormat.Side =<br /> (Microsoft.Office.Interop.Word.WdWrapSideType)Microsoft.Office.Interop.Word.WdWrapType.wdWrapNone;<br /> WApp.Selection.ShapeRange.WrapFormat.Type = Microsoft.Office.Interop.Word.WdWrapType.wdWrapNone;<br /> WApp.Selection.ShapeRange.RelativeHorizontalPosition =(Microsoft.Office.Interop.Word.WdRelativeHorizontalPosition)<br /> Microsoft.Office.Interop.Word.WdRelativeVerticalPosition.wdRelativeVerticalPositionMargin;<br /> WApp.Selection.ShapeRange.RelativeVerticalPosition =<br /> Microsoft.Office.Interop.Word.WdRelativeVerticalPosition.wdRelativeVerticalPositionMargin;<br /> WApp.Selection.ShapeRange.Left =(float)<br /> Microsoft.Office.Interop.Word.WdShapePosition.wdShapeCenter;<br /> WApp.Selection.ShapeRange.Top =(float)<br /> Microsoft.Office.Interop.Word.WdShapePosition.wdShapeCenter;<br /> WApp.ActiveWindow.ActivePane.View.SeekView =<br /> Microsoft.Office.Interop.Word.WdSeekView.wdSeekMainDocument;<br /> }<br />

5.好了,写完了.其实还有好多东西要学习.比如修订,保护...
office的编程部分到这里结束,以后可能要写点EXT+ajax+json+c#方面和mapinfo方面内容.不过这2个进行中,搞完一并发上来.