把一个网页文件的内容导入到word里

最新推荐文章于 2025-08-29 16:07:10 发布

原创最新推荐文章于 2025-08-29 16:07:10 发布 · 2k 阅读

0 ·

本内容遵循CC 4.0 BY-SA版权协议

标签

#vbscript #文档 #服务器 #ie #html

#java

收录于

asp和应用程序专栏收录该内容

7 篇文章

订阅专栏

博客介绍了使用VBScript将网页内容导出到Word文档的方法，包括创建文件夹、文本文件，写入HTML内容等步骤。还提到图片需放在与文档相同目录，可在客户端或服务器端导出，使用IE6.0时需在选项里启用Java。

网页文件可能包括表格线，图片等

<script language=vbscript>
Set MyFileObject=CreateObject("Scripting.FileSystemObject")
if Not MyFileObject.FolderExists("c:/导出word文档/") then
MyFileObject.CreateFolder("c:/导出word文档/")
end if
Set TextFile=MyFileObject.CreateTextFile("c:/导出word文档/test.doc")
set MyFileObject=nothing
TextFile.WriteLine("<html>")
TextFile.WriteLine("<head>")
TextFile.WriteLine("<title>Untitled Document</title>")
TextFile.WriteLine("<meta http-equiv=""Content-Type"" content=""text/html; charset=gb2312"">") '里面的""也可以不要。
TextFile.WriteLine("</head>")
TextFile.WriteLine("<body bgcolor=""#FFFFFF"" text=""#000000"">")
TextFile.WriteLine("<img src=""ad2.gif"" width=""149"" height=""94"">")
TextFile.WriteLine("<a href="" http://www.csdn.net"" target=""_blank"">www.csdn.net</a>")
TextFile.WriteLine("</body>")
TextFile.WriteLine("</html>")
TextFile.close
set TextFile=nothing
</script>
注：1、图片，你要想办法放到和该word文档相同的目录中（变通一下就可以把图片放到相同的目录下了哈）2、这是在客户端导出的，你也可以在服务器端导出,变动一下即可。3、用IE6.0，在IE的选项里启用java。