关于c#生成word的问题 System.Runtime.InteropServices.COMException

2016-04-18 05:39:15 816 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

C# 获取处于运行中的Excel、Word对象今日在写项目的过程中，涉及到对Excel和Word的操作，考虑到程序的健壮性，需要对一些特殊情况作出处理，通常情况下，Excel和Word是通过winform下的openfiledialog打开的，这种情况去获取对于对象是十分方便的。但是有些Word或者Excel由用户自己先行打开了，后面程序再去打开这些文档，就会出现问题，这种情况需要获取Excel或者Word对象该怎么办呢？通过查阅资料... 阅读详情

单个或者批量执行中的第一条没有问题，只要cShape 用过一次就报错误。

System.Runtime.InteropServices.COMException”类型的未经处理的异常在 ModelPrint.exe 中发生
其他信息: 对 COM 组件的调用返回了错误 HRESULT E_FAIL。



private void querendan_Click(bool printModel, string printName, string hetongId, string hetongName, string hetongContect, string hetongTel, string hetongCode, string hetongType, string hetongSeal)

        {

            this.KillProcess("WINWORD");

            string path = System.IO.Directory.GetCurrentDirectory();

            Microsoft.Office.Interop.Word.Application app = null;

            Microsoft.Office.Interop.Word.Document doc = null;



            string dotFilename = (hetongType == "1") ? @"\querenTem1.dot" : @"\querenTem2.dot";

            object missing = System.Reflection.Missing.Value;

            object templateFile = path + dotFilename;



            app = new Microsoft.Office.Interop.Word.ApplicationClass();

            doc = app.Documents.Add(ref templateFile, ref missing, ref missing, ref missing);



            

            string printer = app.ActivePrinter;

            app.ActivePrinter = (printName == "1") ? lstPrinter.Text : lstPrinter1.Text;



            //声明书签数组  

            object[] oBookMark = new object[4];

            oBookMark[0] = "hetongCode";

            oBookMark[1] = "hetongContect";

            oBookMark[2] = "hetongName";

            oBookMark[3] = "hetongTel";





            //赋值数据到书签的位置

            doc.Bookmarks.get_Item(ref oBookMark[0]).Range.Text = hetongCode;

            doc.Bookmarks.get_Item(ref oBookMark[1]).Range.Text = hetongContect;

            doc.Bookmarks.get_Item(ref oBookMark[2]).Range.Text = hetongName;

            doc.Bookmarks.get_Item(ref oBookMark[3]).Range.Text = hetongTel;



            if (checkBox2.Checked == true && printName == "2")

            {

                string pngPath = label6.Text + @"\" + hetongId + ".png";

                if (File.Exists(pngPath))

                {

                    Random rd = new Random();

                    //要插入的图片文件

                    app.Selection.InlineShapes.AddPicture(pngPath, ref missing, ref missing, ref missing);

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

                    Microsoft.Office.Interop.Word.Shape cShape = doc.Application.ActiveDocument.InlineShapes[1].ConvertToShape();

                    cShape.WrapFormat.Type = Microsoft.Office.Interop.Word.WdWrapType.wdWrapTopBottom;

                    cShape.Left = rd.Next(350, 400);

                    cShape.Top = rd.Next(500, 550);// WdShapePosition.wdShapeCenter;居中

                    cShape.Rotation = rd.Next(100, 360);

                        //设置图片浮于文字之上 - 查阅WdWrapType的相关WdWrapType Enumeration

                    cShape.WrapFormat.Type = WdWrapType.wdWrapNone;

                    

                }

            }

            if (printModel || comboBox1.Text.Equals("打印"))

            {

                //打印

                doc.PrintOut(ref missing, ref missing, ref missing, ref missing,

                             ref missing, ref missing, ref missing, ref missing, ref missing,

                             ref missing, ref missing, ref missing, ref missing, ref missing,

                             ref missing, ref missing, ref missing, ref missing);

                //MessageBox.Show("确认单打印成功","提示");

            }

            else

            {

                //弹出保存文件对话框，保存生成的Word

                app.Visible = false;

                SaveFileDialog sfd = new SaveFileDialog();

                sfd.Filter = "Word Document(*.doc)|*.doc";

                sfd.DefaultExt = "Word Document(*.doc)|*.doc";

                if (sfd.ShowDialog() == DialogResult.OK)

                {

                    object filename = sfd.FileName;

                    doc.SaveAs(ref filename, ref missing, ref missing, ref missing,

                                ref missing, ref missing, ref missing, ref missing, ref missing,

                                ref missing, ref missing, ref missing, ref missing, ref missing,

                                ref missing, ref missing);

                    doc.Close(ref missing, ref missing, ref missing);

                    //关闭word

                    app.Quit(ref missing, ref missing, ref missing);

                    MessageBox.Show("确认单导出成功", "提示");

                }

            }

        }

...全文

C#构建可商用语音交互机器人：语义理解+三层解耦+容灾TTS 语音自动朗读系统已从基础TTS合成演进为具备上下文理解、状态感知与任务决策能力的智能交互体。其核心原理在于将语音服务解耦为输入感知、调度控制与合成执行三层架构，通过语义规则引擎实现中文停顿优化，并依托SAPI5与eSpeak.NET双引擎容灾保障可用性。技术价值体现在低延迟音频直通、跨格式文本自适应解析、断点续播与动态语速调节等工程级能力，广泛适用于无障碍设备、教育终端、工业HMI及企业知识播报等真实场景。本文基于C#与Windows原生语音生态，提供可嵌入、可扩展、可上线的语音交互机器人完整实现。阅读详情

wxcyz

C# 111,128 成员 642,536 内容

+ 关注 + 加入社区

切换为时间正序

Strong08 2017-01-04

打赏
举报

同样是第一次插入图片没有问题，第二次插入就出现此问题，代码如下 private bool writeword(string tempDoc, string FileName) { string templateFile = tempDoc; string fileNameWord = FileName; bool ret = false; Microsoft.Office.Interop.Word.Application app = new Microsoft.Office.Interop.Word.ApplicationClass(); Microsoft.Office.Interop.Word.Document doc = new Microsoft.Office.Interop.Word.Document(); object Obj_FileName = fileNameWord; object Visible = false; object ReadOnly = false; object missing = System.Reflection.Missing.Value; try { File.Copy(templateFile, fileNameWord, true); doc = app.Documents.Open(ref Obj_FileName, ref missing, ref ReadOnly, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref Visible, ref missing, ref missing, ref missing, ref missing); doc.Activate(); for (int i = 0; i < 2; i++) { doc.Tables[i+1].Select();//复制第一个表格,如果有多条粘贴到尾部 app.Selection.Copy();//如果导入多条要把原来的模版粘贴下来 object replaceArea = Microsoft.Office.Interop.Word.WdReplace.wdReplaceAll; object replaceKey = "$devicename$"; object replaceValue = "装置名称"; doc.Tables[i + 1].Range.Find.Execute(ref replaceKey, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref replaceValue, ref replaceArea, ref missing, ref missing, ref missing, ref missing); replaceKey = "$areaname$"; replaceValue = "装置名称"; doc.Tables[i + 1].Range.Find.Execute(ref replaceKey, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref replaceValue, ref replaceArea, ref missing, ref missing, ref missing, ref missing); replaceKey = "$enquipmentname$"; replaceValue = "装置名称"; doc.Tables[i + 1].Range.Find.Execute(ref replaceKey, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref replaceValue, ref replaceArea, ref missing, ref missing, ref missing, ref missing); replaceKey = "$tagnumber$"; replaceValue = "装置名称"; doc.Tables[i + 1].Range.Find.Execute(ref replaceKey, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref replaceValue, ref replaceArea, ref missing, ref missing, ref missing, ref missing); replaceKey = "$componenttype$"; replaceValue = "装置名称"; doc.Tables[i + 1].Range.Find.Execute(ref replaceKey, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref replaceValue, ref replaceArea, ref missing, ref missing, ref missing, ref missing); replaceKey = "$medium$"; replaceValue = "装置名称"; doc.Tables[i + 1].Range.Find.Execute(ref replaceKey, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref replaceValue, ref replaceArea, ref missing, ref missing, ref missing, ref missing); replaceKey = "$emmisionderection$"; replaceValue = ""; doc.Tables[i + 1].Range.Find.Execute(ref replaceKey, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref replaceValue, ref replaceArea, ref missing, ref missing, ref missing, ref missing); replaceKey = "$detectvalue$"; replaceValue = "装置名称"; doc.Tables[i + 1].Range.Find.Execute(ref replaceKey, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref replaceValue, ref replaceArea, ref missing, ref missing, ref missing, ref missing); replaceKey = "$detectmandate$"; replaceValue = "装置名称"; doc.Tables[i + 1].Range.Find.Execute(ref replaceKey, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref replaceValue, ref replaceArea, ref missing, ref missing, ref missing, ref missing); replaceKey = "$repairdate$"; replaceValue = "10"; doc.Tables[i + 1].Range.Find.Execute(ref replaceKey, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref missing, ref replaceValue, ref replaceArea, ref missing, ref missing, ref missing, ref missing); string fileName = @"D:\MyFileTest\MyFileTest\bin\Debug\Template\PICTURE\L-00001.jpg"; replaceKey = "$picture$"; Random rd = new Random(); object linkToFile = false; object saveWithDocument = true; doc.Tables[i + 1].Range.Rows[9].Select(); object range = app.Selection.Range; Microsoft.Office.Interop.Word.InlineShape shape = app.ActiveDocument.InlineShapes.AddPicture(fileName, ref linkToFile, ref saveWithDocument, ref range); shape.Width = 230f;//图片宽度 shape.Height = 230f;//图片高度 shape.ConvertToShape().WrapFormat.Type = Microsoft.Office.Interop.Word.WdWrapType.wdWrapSquare;//四周环绕的方式 if (i + 1 != 2) { object mymissing = System.Reflection.Missing.Value; object myunit = Microsoft.Office.Interop.Word.WdUnits.wdStory; app.Selection.EndKey(ref myunit, ref mymissing); object pBreak = (int)Microsoft.Office.Interop.Word.WdBreakType.wdPageBreak; app.Selection.TypeParagraph(); app.Selection.Paste(); } System.Threading.Thread.Sleep(200); } doc.Save(); ret = true; } catch (Exception ex) { ret = false; MessageBox.Show(ex.ToString()); } finally { object o = false; doc.Close(ref o, ref missing, ref missing); app.Quit(ref o, ref missing, ref missing); } return ret; }

Strong08 2017-01-04

打赏
举报

同样问题一直未能解决

wxcyz 2016-04-19

打赏
举报

把插入图片的代码换成下面就好了


object linkToFile = false;
                    object saveWithDocument = true;
                    object range = app.Selection.Range;
                    object left = rd.Next(300, 350);
                    object top = rd.Next(500, 550);
                    float rotation = rd.Next(100, 360);

                    Shape cShape = app.ActiveDocument.Shapes.AddPicture(pngPath, ref linkToFile, ref saveWithDocument, ref left, ref top);
                    cShape.Rotation = rotation;

wxcyz 2016-04-18

打赏
举报

我循环打印的时候第一条打印成功，第二条开始到了那个位置就报错

wxcyz 2016-04-18

打赏
举报

Microsoft.Office.Interop.Word.Shape cShape = doc.Application.ActiveDocument.InlineShapes[1].ConvertToShape(); 这行出错，我这个是一个简单的程序，目的是把一个word模版用相应的内容替换，然后打印，打印的文件有点多，所以要用自动处理。导出的那个可以忽略，是用来调试的，出错的地方是判断有没有那张图片，有就加到模版里面一起打印出来，每个打印的文件最多就一张图片。

为轮子而生 2016-04-18

打赏
举报

①首先你并没有贴出具体是哪一行代码引发了异常，这会让人不知道怎么帮助你。 ②你明明已经定义了名为doc的Document对象，为什么还要用doc.Application.ActiveDocument这样的方式呢？ COM组件的异常处理程序通常不会告诉你很详细的信息，所以在调用的时候要很小心，像doc.Application.ActiveDocument.InlineShapes[1].ConvertToShape()这样炒股哦2层甚至已经到达5层的调用，是很危险的，有任何一层对象为null，调用就会出错，打个比方，你怎么知道InlineShapes[1]这句就一定成立呢，万一InlineShapes的个数为0或者1呢？ ③你的整个程序对“判断”这个概念几乎不涉及，所以才会发生这样无法解释、超出掌控的异常。 ④最后，也是最重要的，还是要标出究竟哪句出错。

关于c#生成word的问题 System.Runtime.InteropServices.COMException

相关推荐