ASP.NET中怎么导出ppt文件数据
创始人
2024-11-28 16:20:40
0次

  在做之前,首先需要添加相关引用Microsoft.Office.Interop.PowerPoint.dll。

using PowerPoint = Microsoft.Office.Interop.PowerPoint;

  操作PPT代码如下:

复制代码
 

public void createPPT()
    {
      try
      {
        //ppt存储路径
        string path = string.Format("{0}/{1}.ppt", Server.MapPath("."), DateTime.Now.Ticks.ToString());
        //ppt引用的模版路径
        string MyTemplateFile = "d:\\test.pot";
        PowerPoint.ApplicationClass MyApp;
        PowerPoint.Presentations MyPresSet;
        PowerPoint._Presentation MyPres;
        PowerPoint.Shape objShape;
        PowerPoint.Slides objSlides;
        PowerPoint._Slide MySlide;
        PowerPoint.TextRange objTextRng;
        PowerPoint.Table table = null;
        MyApp = new PowerPoint.ApplicationClass();
        //如果已存在,则删除
        if (File.Exists((string)path))
        {
          File.Delete((string)path);
        }
        Object Nothing = Missing.Value;
        //套用模版
        MyPres = MyApp.Presentations.Open(MyTemplateFile, MsoTriState.msoFalse, MsoTriState.msoFalse, MsoTriState.msoFalse);
        MyPresSet = MyApp.Presentations;
        objSlides = MyPres.Slides;

        //创建第一张PPT ppLayoutTitle指定模板首页
        MySlide = objSlides.Add(1, PowerPoint.PpSlideLayout.ppLayoutTitle);
        //添加一行文字(left:10,top:110,width:700,height:400)
        objTextRng = MySlide.Shapes.AddLabel(MsoTextOrientation.msoTextOrientationHorizontal, 10, 110, 700, 400).TextFrame.TextRange;
        objTextRng.Text = " PPT";
        objTextRng.Font.Color.RGB = 0x66CCFF; //设置字的颜色
        objTextRng.Font.Size = 42; //字号
        
        //创建第二张PPT ppLayoutBlank指定无标题页
        MySlide = objSlides.Add(2, PowerPoint.PpSlideLayout.ppLayoutBlank);
        //插入图片
        MySlide.Shapes.AddPicture("1.jpg", MsoTriState.msoFalse, MsoTriState.msoTrue, 110, 140, 500, 300);
        
        //创建第三张PPT ppLayoutTitleOnly指定仅有标题页
        MySlide = objSlides.Add(3, PowerPoint.PpSlideLayout.ppLayoutTitleOnly);
        objTextRng = MySlide.Shapes[1].TextFrame.TextRange;
        objTextRng.Text = "目录";
        objTextRng.Font.Size = 32;
        //插入图片
        MySlide.Shapes.AddPicture("1.jpg", MsoTriState.msoFalse, MsoTriState.msoTrue, 110, 140, 500, 300);
        
        //创建第四张PPT
        MySlide = objSlides.Add(3, PowerPoint.PpSlideLayout.ppLayoutBlank);
        //添加一个表格
        objShape = MySlide.Shapes.AddTable(3, 3, 105, 150, 400, 100);
        table = objShape.Table;
        for (int i = 1; i <= table.Rows.Count; i++)
        {
          for (int j = 1; j <= table.Columns.Count; j++)
          {
            table.Cell(i, j).Shape.TextFrame.TextRange.Font.Size = 12;
            table.Cell(i, j).Shape.TextFrame.TextRange.Text = string.Format("[{0},{1}]", i, j);
          }
        }
        
        
        //保存格式
        PowerPoint.PpSaveAsFileType format = PowerPoint.PpSaveAsFileType.ppSaveAsDefault;
        //内容保存
        MyPres.SaveAs(path, format, Microsoft.Office.Core.MsoTriState.msoFalse);
        //关闭excelDoc文档对象
        MyPres.Close();
        //关闭excelApp组件对象
        MyApp.Quit();
      }

相关内容

热门资讯

空调连续工作多久需要停机休息 空调连续工作的时间取决于多个因素,包括空调的型号、功率、使用环境和维护情况等。一般来说,空调可以连续...
空调哪个符号是除湿的 空调除湿功能通常用一个水滴形状的符号表示。不同品牌和型号的空调遥控器可能会有所差异,但一般来说,除湿...
格力空调多长时间加一次氟利昂 1、一般情况下,空调对氟利昂的使用量是非常小的,所以在空调使用了四年左右的时候再考虑加也没问题。2、...
空调用多长时间需要加氟一次 一般情况下是五年。当出现以下这几种情况时,空调才需要加氟。1、空调的室内机和室外机各有两个接口,当接...
格调生活·C标思享荟:卡萨帝在... 9月12日的郑州龙湖金融岛,夜风轻拂,灯光璀璨。“C标时刻共传奇——卡萨帝思享荟暨20周年品牌盛典郑...
品牌价值破千亿、高端份额持续领... 9月12日,“C标时刻共传奇——卡萨帝思享荟暨20周年品牌盛典郑州站”在郑州龙湖金融岛举办。2026...
空调主板坏了修800还是换新的 空调主板坏了是修还是换新,需要考虑多个因素,以下是一些建议:1. 维修成本:如果维修费用较低,比如 ...
空调开多久需要休息多长时间 问题:空调开多久需要休息多长时间回答:1、在使用空调的过程中,一般空调开7~8个小时左右需要休息2~...
中央空调多长时间清洗一次 1、一般空调开机前清洗一次即可,空调开机中间时段再清洗一次,空调关机时清洗一次,这样比较合理。2、空...
中央空调氟利昂多久加一次 看空调制热和制冷程度,很多人的观点认为氟利昂必须一年放一次,其实这个观点是错误的,理解上面有点偏差,...