您的位置:首页 > 其它

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

2004-10-02 05:01 471 查看
网页文件可能包括表格线,图片等

<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。
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签: