// 填充表格内容

    newTable.Cell( 2 ,  1 ).Range.Text  =   " 产品基本信息 " ;

    newTable.Cell( 2 ,  1 ).Range.Font.Color  =  Word.WdColor.wdColorDarkBlue; // 设置单元格内字体颜色

    // 合并单元格

    newTable.Cell( 2 ,  1 ).Merge(newTable.Cell( 2 ,  3 ));

    WordApp.Selection.Cells.VerticalAlignment  =  Word.WdCellVerticalAlignment.wdCellAlignVerticalCenter;

    // 填充表格内容

    newTable.Cell( 3 ,  1 ).Range.Text  =   " 品牌名称： " ;

    newTable.Cell( 3 ,  2 ).Range.Text  =  BrandName;

    // 纵向合并单元格

    newTable.Cell( 3 ,  3 ).Select(); // 选中一行

    object  moveUnit  =  Word.WdUnits.wdLine;

    object  moveCount  =   5 ;

    object  moveExtend  =  Word.WdMovementType.wdExtend;

    WordApp.Selection.MoveDown( ref  moveUnit,  ref  moveCount,  ref  moveExtend);

    WordApp.Selection.Cells.Merge();

    // 插入图片

    string  FileName  =  Picture; // 图片所在路径

    object  LinkToFile  =   false ;

    object  SaveWithDocument  =   true ;

    object  Anchor  =  WordDoc.Application.Selection.Range;

    WordDoc.Application.ActiveDocument.InlineShapes.AddPicture(FileName,  ref  LinkToFile,  ref  SaveWithDocument,  ref  Anchor);

    WordDoc.Application.ActiveDocument.InlineShapes[ 1 ].Width  =  100f; // 图片宽度

    WordDoc.Application.ActiveDocument.InlineShapes[ 1 ].Height  =  100f; // 图片高度

    // 将图片设置为四周环绕型

    Word.Shape s  =  WordDoc.Application.ActiveDocument.InlineShapes[ 1 ].ConvertToShape();

    s.WrapFormat.Type  =  Word.WdWrapType.wdWrapSquare;

    newTable.Cell( 12 ,  1 ).Range.Text  =   " 产品特殊属性 " ;

    newTable.Cell( 12 ,  1 ).Merge(newTable.Cell( 12 ,  3 ));

    // 在表格中增加行

    WordDoc.Content.Tables[ 1 ].Rows.Add( ref  Nothing);

    WordDoc.Paragraphs.Last.Range.Text  =   " 文档创建时间： "   +  DateTime.Now.ToString(); // “落款”

    WordDoc.Paragraphs.Last.Alignment  =  Word.WdParagraphAlignment.wdAlignParagraphRight;

    // 文件保存

    WordDoc.SaveAs( ref  filename,  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.Close( ref  Nothing,  ref  Nothing,  ref  Nothing);

    WordApp.Quit( ref  Nothing,  ref  Nothing,  ref  Nothing);

    message = name + " 文档生成成功，以保存到C:CNSI下 " ;

    }

    catch

    ... {

    message  =   " 文件导出异常！ " ;

    }

    return  message;

    }

 

.
分页: [1] [2]

• 上一篇:.Net基础：ASP.NET网站开发的架构设计
• 下一篇:ASP.NET应用技巧：非托管COM组件的使用

TAG: 文档 WORD 动态