導(dǎo)出excel文檔

getExcel(tableid,name,filename){

? ? ? ? var idTmr;

? ? ? ? function? getExplorer() {

??????????? var explorer = window.navigator.userAgent ;

??????????? //ie

??????????? if (explorer.indexOf("MSIE") >= 0) {

??????????????? return 'ie';

??????????? }

??????????? //firefox

??????????? else if (explorer.indexOf("Firefox") >= 0) {

??????????????? return 'Firefox';

??????????? }

??????????? //Chrome

??????????? else if(explorer.indexOf("Chrome") >= 0){

??????????????? return 'Chrome';

??????????? }

??????????? //Opera

??????????? else if(explorer.indexOf("Opera") >= 0){

??????????????? return 'Opera';

??????????? }

??????????? //Safari

??????????? else if(explorer.indexOf("Safari") >= 0){

??????????????? return 'Safari';

??????????? }

??????? }

??????? function exportExcel(tableid,name,filename) {

??????????? if(getExplorer()=='ie')

??????????? {

??????????????? var curTbl = document.getElementById(tableid);

??????????????? var oXL = new ActiveXObject("Excel.Application");

??????????????? var oWB = oXL.Workbooks.Add();

??????????????? var xlsheet = oWB.Worksheets(1);

??????????????? var sel = document.body.createTextRange();

??????????????? sel.moveToElementText(curTbl);

??????????????? sel.select();

??????????????? sel.execCommand("Copy");

??????????????? xlsheet.Paste();

??????????????? oXL.Visible = true;

??????????????? try {

??????????????????? var fname = oXL.Application.GetSaveAsFilename("Excel.xls", "Excel Spreadsheets (*.xls), *.xls");

??????????????? } catch (e) {

??????????????????? print("Nested catch caught " + e);

??????????????? } finally {

??????????????????? oWB.SaveAs(fname);

??????????????????? oWB.Close(savechanges = false);

??????????????????? oXL.Quit();

??????????????????? oXL = null;

??????????????????? idTmr = window.setInterval("Cleanup();", 1);

??????????????? }

??????????? }

??????????? else

??????????? {

??????????????? tableToExcel(tableid,name,filename)

??????????? }

??????? }

??????? function Cleanup() {

??????????? window.clearInterval(idTmr);

??????????? CollectGarbage();

??????? }

??????? var tableToExcel = (function() {

??????????? var uri = 'data:application/vnd.ms-excel;base64,',

????????????//Excel樣式代碼

??????????? template = '<html xmlns:o="urn:schemas-microsoft-com:office:office" xmlns:x="urn:schemas-microsoft-com:office:excel"'+

?? ??? ??? ??? ??? ??? ?'xmlns="http://www.w3.org/TR/REC-html40"><head><!--[if gte mso 9]><xml><x:ExcelWorkbook><x:ExcelWorksheets><x:ExcelWorksheet>'

?? ??? ??? ??? ??? ??? ?+'<x:Name>{worksheet}</x:Name><x:WorksheetOptions><x:DisplayGridlines/></x:WorksheetOptions></x:ExcelWorksheet></x:ExcelWorksheets>'

?? ??? ??? ??? ??? ??? ?+'</x:ExcelWorkbook></xml><![endif]-->'+

?? ??? ??? ??? ??? ??? ?' <style type="text/css">'+

?? ??? ??? ??? ??? ??? ?'.excelTable? {'+

?? ??? ??? ??? ??? ??? ?'border-collapse:collapse;'+

?? ??? ??? ??? ??? ??? ? ' border:thin solid #999; '+

?? ??? ??? ??? ??? ??? ?'}'+

?? ??? ??? ??? ??? ??? ?'?? .excelTable? th {'+

?? ??? ??? ??? ??? ??? ?'?? border: thin solid #999;'+

?? ??? ??? ??? ??? ??? ?'? padding:20px;'+

?? ??? ??? ??? ??? ??? ?'? text-align: center;'+

?? ??? ??? ??? ??? ??? ?'? border-top: thin solid #999;'+

?? ??? ??? ??? ??? ??? ?' background-color: #E6E6E6;'+

?? ??? ??? ??? ??? ??? ?' }'+

?? ??? ??? ??? ??? ??? ?' .excelTable? td{'+

?? ??? ??? ??? ??? ??? ?' border:thin solid #999;'+

?? ??? ??? ??? ??? ??? ?'? padding:2px 5px;'+

?? ??? ??? ??? ??? ??? ?'? text-align: center;'+

?? ??? ??? ??? ??? ??? ?' }</style>'+

?? ??? ??? ??? ??? ??? ?'</head><body ><table class="excelTable">{table}</table></body></html>', ?

??????????????????? base64 = function(s) { return window.btoa(unescape(encodeURIComponent(s))) },

??????????????????? format = function(s, c) {

??????????????????????? return s.replace(/{(\w+)}/g,

??????????????????????????????? function(m, p) { return c[p]; }) }

??????????? return function(table, name, filename) {

??????????????? if (!table.nodeType) table = document.getElementById(table)

? ? ? ? ? ? ? ? console.log(table)

??????????????? var ctx = {worksheet: name || 'Worksheet', table: table.innerHTML}

??????????????? document.getElementById("bb").href = uri + base64(format(template, ctx));

??????????????? document.getElementById("bb").download = "123.xls";

??????????? }

??????? })()

? ? ? ? exportExcel(tableid,name,filename)

? ? }

?著作權(quán)歸作者所有,轉(zhuǎn)載或內(nèi)容合作請(qǐng)聯(lián)系作者
  • 序言:七十年代末,一起剝皮案震驚了整個(gè)濱河市让网,隨后出現(xiàn)的幾起案子师痕,更是在濱河造成了極大的恐慌,老刑警劉巖胰坟,帶你破解...
    沈念sama閱讀 222,865評(píng)論 6 518
  • 序言:濱河連續(xù)發(fā)生了三起死亡事件,死亡現(xiàn)場(chǎng)離奇詭異竞滓,居然都是意外死亡,警方通過查閱死者的電腦和手機(jī)锯茄,發(fā)現(xiàn)死者居然都...
    沈念sama閱讀 95,296評(píng)論 3 399
  • 文/潘曉璐 我一進(jìn)店門茶没,熙熙樓的掌柜王于貴愁眉苦臉地迎上來,“玉大人喂急,你說我怎么就攤上這事笛求。” “怎么了探入?”我有些...
    開封第一講書人閱讀 169,631評(píng)論 0 364
  • 文/不壞的土叔 我叫張陵蜂嗽,是天一觀的道長(zhǎng)。 經(jīng)常有香客問我徒爹,道長(zhǎng)芋类,這世上最難降的妖魔是什么? 我笑而不...
    開封第一講書人閱讀 60,199評(píng)論 1 300
  • 正文 為了忘掉前任胖喳,我火速辦了婚禮贮竟,結(jié)果婚禮上,老公的妹妹穿的比我還像新娘技健。我一直安慰自己惰拱,他們只是感情好,可當(dāng)我...
    茶點(diǎn)故事閱讀 69,196評(píng)論 6 398
  • 文/花漫 我一把揭開白布欣孤。 她就那樣靜靜地躺著馋没,像睡著了一般降传。 火紅的嫁衣襯著肌膚如雪。 梳的紋絲不亂的頭發(fā)上声旺,一...
    開封第一講書人閱讀 52,793評(píng)論 1 314
  • 那天泽论,我揣著相機(jī)與錄音,去河邊找鬼缚够。 笑死鹦赎,一個(gè)胖子當(dāng)著我的面吹牛,可吹牛的內(nèi)容都是我干的古话。 我是一名探鬼主播,決...
    沈念sama閱讀 41,221評(píng)論 3 423
  • 文/蒼蘭香墨 我猛地睜開眼杖们,長(zhǎng)吁一口氣:“原來是場(chǎng)噩夢(mèng)啊……” “哼肩狂!你這毒婦竟也來了?” 一聲冷哼從身側(cè)響起傻谁,我...
    開封第一講書人閱讀 40,174評(píng)論 0 277
  • 序言:老撾萬榮一對(duì)情侶失蹤审磁,失蹤者是張志新(化名)和其女友劉穎,沒想到半個(gè)月后态蒂,有當(dāng)?shù)厝嗽跇淞掷锇l(fā)現(xiàn)了一具尸體,經(jīng)...
    沈念sama閱讀 46,699評(píng)論 1 320
  • 正文 獨(dú)居荒郊野嶺守林人離奇死亡瓤介,尸身上長(zhǎng)有42處帶血的膿包…… 初始之章·張勛 以下內(nèi)容為張勛視角 年9月15日...
    茶點(diǎn)故事閱讀 38,770評(píng)論 3 343
  • 正文 我和宋清朗相戀三年刑桑,在試婚紗的時(shí)候發(fā)現(xiàn)自己被綠了。 大學(xué)時(shí)的朋友給我發(fā)了我未婚夫和他白月光在一起吃飯的照片祠斧。...
    茶點(diǎn)故事閱讀 40,918評(píng)論 1 353
  • 序言:一個(gè)原本活蹦亂跳的男人離奇死亡琢锋,死狀恐怖,靈堂內(nèi)的尸體忽然破棺而出吴超,到底是詐尸還是另有隱情,我是刑警寧澤鲸阻,帶...
    沈念sama閱讀 36,573評(píng)論 5 351
  • 正文 年R本政府宣布鸟悴,位于F島的核電站,受9級(jí)特大地震影響细诸,放射性物質(zhì)發(fā)生泄漏。R本人自食惡果不足惜利赋,卻給世界環(huán)境...
    茶點(diǎn)故事閱讀 42,255評(píng)論 3 336
  • 文/蒙蒙 一猩系、第九天 我趴在偏房一處隱蔽的房頂上張望。 院中可真熱鬧蝙眶,春花似錦褪那、人聲如沸。這莊子的主人今日做“春日...
    開封第一講書人閱讀 32,749評(píng)論 0 25
  • 文/蒼蘭香墨 我抬頭看了看天上的太陽武学。三九已至伦意,卻和暖如春,著一層夾襖步出監(jiān)牢的瞬間驮肉,已是汗流浹背。 一陣腳步聲響...
    開封第一講書人閱讀 33,862評(píng)論 1 274
  • 我被黑心中介騙來泰國(guó)打工票编, 沒想到剛下飛機(jī)就差點(diǎn)兒被人妖公主榨干…… 1. 我叫王不留卵渴,地道東北人。 一個(gè)月前我還...
    沈念sama閱讀 49,364評(píng)論 3 379
  • 正文 我出身青樓昔榴,卻偏偏與公主長(zhǎng)得像瑟啃,于是被迫代替她去往敵國(guó)和親。 傳聞我的和親對(duì)象是個(gè)殘疾皇子蛹屿,可洞房花燭夜當(dāng)晚...
    茶點(diǎn)故事閱讀 45,926評(píng)論 2 361

推薦閱讀更多精彩內(nèi)容

  • "use strict";function _classCallCheck(e,t){if(!(e instanc...
    久些閱讀 2,037評(píng)論 0 2
  • Lua 5.1 參考手冊(cè) by Roberto Ierusalimschy, Luiz Henrique de F...
    蘇黎九歌閱讀 13,836評(píng)論 0 38
  • 第一部分 HTML&CSS整理答案 1. 什么是HTML5坟瓢? 答:HTML5是最新的HTML標(biāo)準(zhǔn)犹撒。 注意:講述HT...
    kismetajun閱讀 27,526評(píng)論 1 45
  • 巜高級(jí)英才14天父母實(shí)踐打卡》第7天:今天和兒子參加一天親子公益課,兒子在課堂表現(xiàn)非呈都眨活躍,積極回答問題清笨,唯一一個(gè)...
    cqJoan閱讀 104評(píng)論 0 1
  • 七月刃跛,我回到曾經(jīng)生活了十年的城市。這里是兒子的故鄉(xiāng)桨昙,還沒有到達(dá)目的地腌歉,他已經(jīng)迫不及待地開始用電話聯(lián)系每一位日思夜想...
    cola的春天閱讀 468評(píng)論 2 4