CSDN博客

img aspczlover

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

发表于2004/10/2 5:01:00  1390人阅读

分类: asp和应用程序

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

<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。
阅读全文
0 0

相关文章推荐

img
取 消
img