JavaScript導出Word后對Word分頁的處理
系統(tǒng)
4154 0
html
>
????
<
HEAD
>
????????
<
title
>
WEB頁面導出為Word文檔后分頁的方法?
</
title
>
????
</
HEAD
>
????
<
SCRIPT?LANGUAGE
=
"
javascript
"
>
????????????????
/**/
/*
?????????????????*?
?????????????????*?@param?{Object}?cont??要導出的html元素內(nèi)容的id,注意不要加雙引號
?????????????????*?@param?{Object}?key???分頁關鍵字
?????????????????
*/
????????????????
function
?AllAreaWord(cont,key)
????????????????
{
????????????????????
var
?oWD?
=
?
new
?ActiveXObject(
"
Word.Application
"
);
????????????????????
//
默認為頁面視圖
????????????????????
var
?oDC?
=
?oWD.Documents.Add(
""
,?
0
,?
0
);
????????????????????
var
?oRange?
=
?oDC.Range(
0
,?
1
);
????????????????????
//
var?oRange1?=?oDC.Range(0,2);
????????????????????
var
?sel?
=
?document.body.createTextRange();
????????????????????
//
參數(shù)為html元素id?
????????????????????sel.moveToElementText(cont);
????????????????????sel.select();
????????????????????sel.execCommand(
"
Copy
"
);
????????????????????oRange.Paste();
????????????????????oWD.Application.Visible?
=
?
true
;
????????????????????
//
得到打開后word的selection對象
????????????????????
var
?selection?
=
?oWD.Selection;
????????????????????
//
設置字體大小
????????????????????selection.Font.Size?
=
?
10
;
????????????????????
//
ctrl+A?全選操作
????????????????????selection.WholeStory();
????????????????????
//
清除格式
????????????????????selection.Find.ClearFormatting();
????????????????????
//
指定查找關鍵字
????????????????????selection.Find.Text?
=
?key;
????????????????????
//
^m為手動分頁符標記
????????????????????
//
向下查找
????????????????????selection.Find.Forward?
=
?
true
;
????????????????????selection.Find.Wrap?
=
?
1
;
????????????????????
//
不區(qū)分大小寫
????????????????????selection.Find.MatchCase?
=
?
false
;
????????????????????
//
不匹配整個單詞
????????????????????selection.Find.MatchWholeWord?
=
?
false
;
????????????????????
//
如果找到指定字符串返回真,否則返回false
????????????????????
while
?(selection.Find.Execute())?
????????????????????
{
????????????????????????
//
插入分頁符,分頁符常量為7,具體可查word?api
????????????????????????selection.InsertBreak(
7
);
????????????????????}
????????????????}
????
</
SCRIPT
>
????
<
body
>
????????
<
BR
>
????????
<
div?id
=
"
test
"
>
????????????aaa
????????????
^
????????????bbb
????????????
^
????????????ccc
????????
</
div
>
????????
<
input?type
=
"
button
"
?onclick
=
"
javascript:AllAreaWord(test,'^');
"
?value
=
"
導出頁面指定區(qū)域內(nèi)容到Word
"
/>
????
</
body
>
</
html
>
其中是識別"^"來進行分頁的，當然可以改成其他
JavaScript導出Word后對Word分頁的處理
更多文章、技術交流、商務合作、聯(lián)系博主
微信掃碼或搜索：z360901061
微信掃一掃加我為好友
QQ號聯(lián)系： 360901061
您的支持是博主寫作最大的動力，如果您喜歡我的文章，感覺我的文章對您有幫助，請用微信掃描下面二維碼支持博主2元、5元、10元、20元等您想捐的金額吧，狠狠點擊下面給點支持吧，站長非常感激您！手機微信長按不能支付解決辦法：請將微信支付二維碼保存到相冊，切換到微信，然后點擊微信右上角掃一掃功能，選擇支付二維碼完成支付。
【本文對您有幫助就好】元