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 method1(tableid) {//整個(gè)表格拷貝到EXCEL中
if(getExplorer()=='ie')
{
var curTbl = document.getElementById(tableid);
var oXL = new ActiveXObject("Excel.Application");
//創(chuàng)建AX對(duì)象excel
var oWB = oXL.Workbooks.Add();
//獲取workbook對(duì)象
var xlsheet = oWB.Worksheets(1);
//激活當(dāng)前sheet
var sel = document.body.createTextRange();
sel.moveToElementText(curTbl);
//把表格中的內(nèi)容移到TextRange中
sel.select();
//全選TextRange中內(nèi)容
sel.execCommand("Copy");
//復(fù)制TextRange中內(nèi)容
xlsheet.Paste();
//粘貼到活動(dòng)的EXCEL中
oXL.Visible = true;
//設(shè)置excel可見屬性
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);
//xls.visible = false;
oXL.Quit();
oXL = null;
//結(jié)束excel進(jìn)程躬拢，退出完成
//window.setInterval("Cleanup();",1);
idTmr = window.setInterval("Cleanup();", 1);
}
}
else
{
tableToExcel(tableid);
}
}
function Cleanup() {
window.clearInterval(idTmr);
CollectGarbage();
}
var tableToExcel = (function() {
var uri = 'data:application/vnd.ms-excel;base64,',
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]--></head><body><table>{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) {
if (!table.nodeType) table = document.getElementById(table)
var ctx = {worksheet: name || 'Worksheet', table: table.innerHTML}
window.location.href = uri + base64(format(template, ctx))
}
})();
method1("my");
JS下載網(wǎng)頁table到excel
最后編輯于 ：
?著作權(quán)歸作者所有,轉(zhuǎn)載或內(nèi)容合作請(qǐng)聯(lián)系作者
- 文/潘曉璐 我一進(jìn)店門妙啃，熙熙樓的掌柜王于貴愁眉苦臉地迎上來档泽，“玉大人，你說我怎么就攤上這事彬祖∽率荩” “怎么了？”我有些...
- 文/不壞的土叔 我叫張陵储笑，是天一觀的道長甜熔。 經(jīng)常有香客問我，道長突倍，這世上最難降的妖魔是什么腔稀？ 我笑而不...
- 正文 為了忘掉前任，我火速辦了婚禮羽历，結(jié)果婚禮上焊虏，老公的妹妹穿的比我還像新娘。我一直安慰自己秕磷，他們只是感情好诵闭，可當(dāng)我...
- 文/花漫 我一把揭開白布。 她就那樣靜靜地躺著澎嚣，像睡著了一般疏尿。 火紅的嫁衣襯著肌膚如雪。 梳的紋絲不亂的頭發(fā)上易桃，一...
- 文/蒼蘭香墨 我猛地睜開眼吭练，長吁一口氣：“原來是場噩夢啊……” “哼！你這毒婦竟也來了褐鸥？” 一聲冷哼從身側(cè)響起线脚，我...
- 序言：老撾萬榮一對(duì)情侶失蹤，失蹤者是張志新（化名）和其女友劉穎叫榕，沒想到半個(gè)月后浑侥，有當(dāng)?shù)厝嗽跇淞掷锇l(fā)現(xiàn)了一具尸體，經(jīng)...
- 正文 獨(dú)居荒郊野嶺守林人離奇死亡晰绎，尸身上長有42處帶血的膿包…… 初始之章·張勛 以下內(nèi)容為張勛視角 年9月15日...
- 正文 我和宋清朗相戀三年寓落，在試婚紗的時(shí)候發(fā)現(xiàn)自己被綠了。 大學(xué)時(shí)的朋友給我發(fā)了我未婚夫和他白月光在一起吃飯的照片荞下。...
- 正文 年R本政府宣布抽诉，位于F島的核電站陨簇，受9級(jí)特大地震影響，放射性物質(zhì)發(fā)生泄漏迹淌。R本人自食惡果不足惜河绽，卻給世界環(huán)境...
- 文/蒙蒙 一、第九天 我趴在偏房一處隱蔽的房頂上張望唉窃。 院中可真熱鬧耙饰，春花似錦、人聲如沸纹份。這莊子的主人今日做“春日...
- 文/蒼蘭香墨 我抬頭看了看天上的太陽蔓涧。三九已至削咆，卻和暖如春，著一層夾襖步出監(jiān)牢的瞬間蠢笋，已是汗流浹背。 一陣腳步聲響...
- 正文 我出身青樓，卻偏偏與公主長得像援岩，于是被迫代替她去往敵國和親歼狼。 傳聞我的和親對(duì)象是個(gè)殘疾皇子，可洞房花燭夜當(dāng)晚...
