таблица на печать! -> Форум на Исходниках.RU [Powered by Invision Power Board]

<{CODE_COLLAPSE_OFF}><{CODE_WRAP_OFF}>

### jsp_ved.jsp ----> Главная страница на JSP, всего лишь интерпретатор,

### так что перемисать под тот же PHP не составит труда.

### Не обращайте внимание на JavaBeans'ы, не имеет значение

### откуда брать инфу, все самое важное в JS'ке. Итак:

<%@ page contentType="text/html; charset=windows-1251" %>

<html>

<head>

[B]<script src="ved2excel.js"></SCRIPT>[/B]

</head>

<jsp:useBean id="jsp_vedbeanId" scope="session" class="authorize_users1.jsp_vedbean" />

<jsp:setProperty name="jsp_vedbeanId" property="*" />

<body>

var prt = document.location.port; if (prt=="") {prt = "80";}

var hostname = "http://"+document.location.hostname+":"+prt;

document.writeln("<a style='cursor: Hand;' onClick='Export(\""+hostname+"<jsp:getProperty name="jsp_vedbeanId" property="path" />/xls/ved.xls\")'>

<img src='images/excel.gif' width=20 height=20 alt='Экспортировать в MS Excel'></a>");

</script>

<thead>

<th>Колонка 1</th>

<th>Колонка 2</th>

</thead>

<jsp:getProperty name="jsp_vedbeanId" property="table" />

</table>

<jsp:getProperty name="jsp_vedbeanId" property="error_msg" />

</body>

</html>

<{CODE_COLLAPSE_OFF}><{CODE_WRAP_OFF}>

// Получить ссылку в формате A1 из номера строки и колонки

function GetRef(_row, _col) {

var xCol = String.fromCharCode( (new String("A")).charCodeAt(0) + _col - 1 );

var rng = xCol + _row;

return rng;

}

// Запись данных в ячейки

function ExportTable(sheet, t, from_row,length_col){

var R0 = GetRef(from_row, 1);

var R1;

var R;

var xlEdgeBottom = 9;

var xlEdgeLeft = 7;

var xlEdgeRight = 10;

var xlEdgeTop = 8;

if ( length_col > 26 ) {

R1 = GetRef(t.rows.length + from_row - 1, length_col-26);

R = R0 + ":A" + R1;

} else {

R1 = GetRef(t.rows.length + from_row - 1, length_col);

R = R0 + ":" + R1;

}

for( var ir = 0, NR = t.rows.length ; ir < NR ; ++ir )

{

var r = t.rows[ir];

for( var ic = 0, NC = r.cells.length ; ic < NC ; ++ic )

{

var c = r.cells[ic];

var xc = sheet.Cells( ir + from_row, ic + 1 );

xc.WrapText = true;

xc.Value = c.innerText;

if (ic==0) {xc.Borders(xlEdgeLeft).Weight = 3;}

else {xc.Borders(xlEdgeLeft).Weight = 2;}

if (ic==NC-1) {xc.Borders(xlEdgeRight).Weight = 3;}

else {xc.Borders(xlEdgeRight).Weight = 3;}

if ((ir==NR-1)||(ir==0)) {xc.Borders(xlEdgeBottom).Weight = 3;}

else {xc.Borders(xlEdgeBottom).Weight = 2;}

}

return ir + from_row;

}

/* Экспортировать в Excel */

//xlsname - имя документа с путем!

function Export(xlsname) {

var excel;

error = 0;

error_msg = "";

try {

excel = new ActiveXObject("Excel.Application");

excel.Visible = true;

var book=excel.Application.Workbooks.Open(xlsname);

excel.Application.Visible = true;

var sheet = book.Worksheets.Item(1); // Имя листа или его номер

sheet.Select;

//Убирание символов <br>

var re = new RegExp("<br>","gi");

var s = document.all.title.innerText+"\n\r"+document.all.title1.innerText;

s = s.replace(re,"\n\r");

sheet.Range("A2").Value = s; //Заголовок

/* s = document.all.title1.innerText;

sheet.Range("А5").Value = s; */

var last_row=4; // с какой строки

var length_col=20; // количество колонок

//Таблица

var max_row = ExportTable(sheet, document.all.TableMain, last_row,length_col);

s = document.all.desc.innerText;

var c = GetRef(max_row+1,1);

sheet.Range(c).Font.Bold = true;

sheet.Range(c).HorizontalAlignment = -4131;

sheet.Range(c).Value = s;

sheet.Range("A1").Select;

// excel.ActiveWorkbook.RunAutoMacros(1);

excel = "";

} catch(e) { error = 1; error_msg = e.description; }

if (error==0) { alert("Экспорт в Excel завершен!"); }

else {alert("Ошибка при экспорте таблицы в MS Excel. Эта ошибка могла возникнуть

по двум причинам: \n\r 1. Не установлен MS Excel \n\r 2. Неправильно

настроена безопасность браузера.\n\r"+error_msg);}

}