/**//***@param{Object}cont要導出的html元素內(nèi)容的id,注意不要加雙引號*@param{Object}key分頁關(guān)鍵字*/functionAllAreaWord(cont,key){varoWD=newActiveXObject("Word.Application")" />

亚洲免费在线-亚洲免费在线播放-亚洲免费在线观看-亚洲免费在线观看视频-亚洲免费在线看-亚洲免费在线视频

JavaScript導出Word后對Word分頁的處理

系統(tǒng) 3888 0
html >
????
< HEAD >
????????
< title > WEB頁面導出為Word文檔后分頁的方法? </ title >
????
</ HEAD >
????
< SCRIPT?LANGUAGE = " javascript " >
????????????????
/**/ /*
?????????????????*?
?????????????????*?@param?{Object}?cont??要導出的html元素內(nèi)容的id,注意不要加雙引號
?????????????????*?@param?{Object}?key???分頁關(guān)鍵字
?????????????????
*/

????????????????
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;
????????????????????
// 設(shè)置字體大小
????????????????????selection.Font.Size? = ? 10 ;
????????????????????
// ctrl+A?全選操作
????????????????????selection.WholeStory();
????????????????????
// 清除格式
????????????????????selection.Find.ClearFormatting();
????????????????????
// 指定查找關(guān)鍵字
????????????????????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分頁的處理


更多文章、技術(shù)交流、商務合作、聯(lián)系博主

微信掃碼或搜索:z360901061

微信掃一掃加我為好友

QQ號聯(lián)系: 360901061

您的支持是博主寫作最大的動力,如果您喜歡我的文章,感覺我的文章對您有幫助,請用微信掃描下面二維碼支持博主2元、5元、10元、20元等您想捐的金額吧,狠狠點擊下面給點支持吧,站長非常感激您!手機微信長按不能支付解決辦法:請將微信支付二維碼保存到相冊,切換到微信,然后點擊微信右上角掃一掃功能,選擇支付二維碼完成支付。

【本文對您有幫助就好】

您的支持是博主寫作最大的動力,如果您喜歡我的文章,感覺我的文章對您有幫助,請用微信掃描上面二維碼支持博主2元、5元、10元、自定義金額等您想捐的金額吧,站長會非常 感謝您的哦!!!

發(fā)表我的評論
最新評論 總共0條評論
主站蜘蛛池模板: 色综合久久天天综线观看 | 欧美xxxxx九色视频免费观看 | 欧洲天堂 | 久久99热久久精品91 | 国产福利免费在线观看 | 欧美在线观看一区二区 | 婷婷在线五月 | 成年人黄色在线观看 | 人人澡人人澡人人看欧美 | 国产高清在线精品二区一 | 色噜噜狠狠成人中文小说 | 欧美极品福利视频在线播放 | 日本久久久久中文字幕 | 97视频在线视频 | 国产精品欧美韩国日本久久 | 亚洲国产精品久久日 | 天上人间影院久久国产 | 五月开心六月伊人色婷婷 | 欧美一级毛片一级 | 国产伦精品一区二区三区免费迷 | 亚洲成在人线久久综合 | 99精品视频在线视频免费观看 | 奇米影视7777久久精品 | 在线不卡一区 | 国产毛片一区二区三区精品 | 天海翼一区二区三区高清视频 | 日韩精品福利视频一区二区三区 | 日本一级大黄毛片一级 | 国产91久久久久久久免费 | 啪啪色视频 | 国产成人精品在线 | 草的爽免费视频 | 日本不卡视频在线观看 | 久久夜靖品 | 久久精品国产屋 | 九九热视频在线观看 | 国产福利99 | 欧美日韩1区 | 亚洲va高清中文字幕 | 911视频免费 | 久久精品国产亚洲婷婷 |