Генерация отчета формата MS Excel средствами ASP Версия для печати
 

Достаточно часто возникают ситуации, когда необходимо некоторые данные отобразить в броузер в формате MS Excel. Создать отчет такого рода можно "на лету", установив соответствующее свойство ContentType. Сделать это можно таким образом:

<%Response.ContentType = "application/vnd.ms-excel"%> 
Попробуем создать простой отчет из ASP:

Создаем страницу sample.asp:

<% response.expires = "0"%> <%Response.ContentType = "application/vnd.ms-excel"%> 
<% Dim rs,sql,conn set conn = server.createobject("adodb.connection") conn.open "asp", 
"scott", "tiger" Set rs = Server.CreateObject ("ADODB.Recordset") 
sql = "Select * from emp" rs.Open sql,conn,3 %> <html> 
<body> <table BORDER="1" align="center"> <tr> 
<% for i = 0 to rs.fields.count -1 %> <td><%=rs.fields(i).name</td> 
<%next%> </tr> <% rs.MoveFirst while not rs.EOF %> <tr> 
<% for i = 0 to rs.fields.count -1 %> <td><%=rs.fields(i).value</td>
<%next%> </tr> <% rs.MoveNext Wend %> </table> 
</body> </html> <% rs.Close Set rs=nothing %> 
При вызове этой страницы получим выборку из базы данных, отображаемую в броузере как лист MS Excel.
 
Автор: Gopikrishna
 
Оригинал статьи: http://www.woweb.ru/publ/60-1-0-197
 
Рейтинг@Mail.ru
© Студия WEB-дизайна PM-Studio, 2005. Все права защищены.