把一個網頁文件的內容導入到word裏

網頁文件可能包括表格線,圖片等

<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。
發表評論
所有評論
還沒有人評論,想成為第一個評論的人麼? 請在上方評論欄輸入並且點擊發布.
相關文章