/**//***@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條評論
主站蜘蛛池模板: 国产欧美亚洲精品第二区首页 | 国产看色免费 | 青青青草视频在线观看 | 欧美影院一区二区 | 久久福利一区二区三区 | 色偷偷亚洲第一成人综合网址 | 日本不卡中文字幕 | 久久婷婷是五月综合色狠狠 | 国产成人精品区在线观看 | 狠狠亚洲丁香综合久久 | 91视频夜色 | 亚洲va在线va天堂va手机 | 免费观看日本特色做爰视频在线 | 四虎影视永久地址www成人污 | 欧美日韩在线成人免费视频大全 | 亚洲精品99久久久久中文字幕 | 亚洲a视频 | 大片刺激免费播放视频 | 日韩第3页 | 视频一区日韩 | 国产精品品福利视频 | 亚洲国产精品成人综合久久久 | 国产成人禁片在线观看 | 110139日韩欧美 | 午夜a毛片| 寡妇野外啪啪一区二区 | 欧美激情久久久久久久大片 | 亚洲综合图片 | 免费无毒片在线观看 | 99久久国产综合精品成人影院 | 插插天天| 久久五月天综合网 | 日本亚洲欧美国产日韩ay高清 | 国产精品亚洲一区二区三区正片 | 成人网在线看 | 777色狠狠一区二区三区 | 99久久国产| 久久黄色网址 | 四虎1515hhwocw | 日本一级毛片毛片一级毛片 | 亚洲成a人片在线v观看 |