A股上市公司传智教育(股票代码 003032)旗下技术交流社区北京昌平校区

 找回密码
 加入黑马

QQ登录

只需一步,快速开始

© 嘴角上揚ぃ读不 中级黑马   /  2014-4-26 17:53  /  845 人查看  /  2 人回复  /   0 人收藏 转载请遵从CC协议 禁止商业使用本文

本帖最后由 嘴角上揚ぃ读不 于 2014-4-27 10:01 编辑

谁会导出word文档?

2 个回复

倒序浏览
  1. using System;
  2. using System.Collections.Generic;
  3. using System.Text;
  4. using Word = Microsoft.Office.Interop.Word;
  5. using System.Reflection;
  6. using System.Data;

  7. namespace ExportTest
  8. {
  9.     /// <summary>
  10.     /// 导出word
  11.     /// </summary>
  12.     public class ExportWord
  13.     {
  14.         /// <summary>
  15.         /// 将数据表导出到word
  16.         /// </summary>
  17.         /// <param name="dt">数据表</param>
  18.         /// <param name="isShowWord">是否显示word</param>
  19.         /// <param name="fileName">导出到文件名</param>
  20.         /// <param name="picName">导出到word中图片名</param>
  21.         /// <returns></returns>
  22.         public static bool ExportToWord(DataTable dt, bool isShowWord, object fileName, string picName)
  23.         {
  24.             if (System.IO.File.Exists(fileName.ToString()))
  25.             {
  26.                 System.IO.File.Delete(fileName.ToString());
  27.             }
  28.             bool result = true;

  29.             Object myobj = Missing.Value; ;
  30.             if (dt == null || dt.Rows.Count == 0)
  31.             {
  32.                 result = false;
  33.             }
  34.             else
  35.             {
  36.                 //建立Word应用
  37.                 Word.Application word = new Word.Application();

  38.                 //word文档
  39.                 Word.Document mydoc = new Word.Document();
  40.                 mydoc = word.Documents.Add(ref myobj, ref myobj, ref myobj, ref myobj);
  41.                 word.Visible = isShowWord;
  42.                 mydoc.Select();

  43.                 Word.Selection mysel = word.Selection;

  44.                 //mysel.InlineShapes.AddPicture(picName, ref myobj, ref myobj, ref myobj);
  45.                 object top = 100;
  46.                 object left = 300;
  47.                 object hw = 100;


  48.                 //将数据生成Word表格文件
  49.                 Word.Table mytable = mydoc.Tables.Add(mysel.Range, dt.Rows.Count, dt.Columns.Count, ref myobj, ref myobj);

  50.                 //设置列宽
  51.                 mytable.Columns.SetWidth(50, Word.WdRulerStyle.wdAdjustNone);

  52.                 //输出列标题数据
  53.                 for (int i = 0; i < dt.Columns.Count; i++)
  54.                 {
  55.                     mytable.Cell(1, i + 1).Range.InsertAfter(dt.Columns[i].ColumnName);
  56.                 }
  57.                 //输出控件中的记录
  58.                 for (int i = 0; i < dt.Rows.Count - 1; i++)
  59.                 {
  60.                     for (int j = 0; j < dt.Columns.Count; j++)
  61.                     {
  62.                         mytable.Cell(i + 2, j + 1).Range.InsertAfter(dt.Rows[i][j].ToString());
  63.                     }
  64.                 }

  65.                 mydoc.Shapes.AddPicture(picName, ref myobj, ref myobj, ref left, ref top, ref hw, ref hw, ref myobj);

  66.                 //保存文本
  67.                 mydoc.SaveAs(ref fileName, ref myobj, ref myobj, ref myobj, ref myobj, ref myobj,
  68.                 ref myobj, ref myobj, ref myobj, ref myobj, ref myobj, ref myobj,
  69.                 ref myobj, ref myobj, ref myobj, ref myobj);
  70.             }

  71.             return result;
  72.         }

  73.     }
  74. }
复制代码

评分

参与人数 1技术分 +1 收起 理由
czwanglei + 1

查看全部评分

回复 使用道具 举报
这个不好弄,在MSDN上面有一个例子,比较好,我上次用的时候就改的那段代码
回复 使用道具 举报
您需要登录后才可以回帖 登录 | 加入黑马