在ASP中将图像插入word文件

Question

我正在尝试使用 ASP Classic 在服务器上自动创建一些 Word 文件。它工作正常，但唯一的问题是当我下载文件时，其中没有图片，而是得到类似占位符的东西。这是我的代码：

set fso = createobject("scripting.filesystemobject")
设置 act = fso.CreateTextFile(server.mappath("/") & file_being_created, true)

act.WriteLine("
act.WriteLine("xmlns:o=""urn:schemas-microsoft-com:office:office""")
act.WriteLine("xmlns:w=""urn:schemas-microsoft-com:office:word""")
act.WriteLine("xmlns:m=""http://schemas.microsoft.com/office/2004/12/oml""")
act.WriteLine("xmlns:css=""http://macVmlSchemaUri"" xmlns=""http://www.w3.org/TR/REC-html40"">")
act.WriteLine("")
act.WriteLine(" ")
act.WriteLine("
>" )< /代码>
act.WriteLine(rsInvoices("invoiceClientID") & "
" )
act.WriteLine(rsInvoices("invoiceNumber") )
act.WriteLine("")"
act.close


你知道在Word文件中添加图片吗？ 提前致谢。

Answer 1

好的，为了得到这个答案，我所做的就是创建一个新的 Word 文档（使用 Word 2010），插入硬盘中的图片，然后将该文件另存为 HTML 文件。然后我查看了生成的页面并尝试解构 Word 正在做什么。我发现除了 HTML 标记之外，Word 还创建了一个 元素，该元素被 条件注释。以下是我根据您的示例得出的结论：

<!--[if gte vml 1]>
<v:shape id="Picture1" style="width:800px;height:200px;">
 <v:imagedata src="http://mysite.com/images/pic.jpg"/>
</v:shape>
<![endif]-->
<![if !vml]>
<img src='http://mysite.com/images/pic.jpg' width='800' height='200' v:shapes="Picture1"/>
<![endif]>

如果您将此文件作为 .doc 文件提供，则可以通过仅包含 元素和省略有条件的评论。

<v:shape id="Picture1" style="width:800px;height:200px;">
 <v:imagedata src="http://mysite.com/images/pic.jpg"/>
</v:shape>