| У нас вы всегда найдете: методические указания по самостоятельному освоению популярных компьютерных программ, обучающие программы, документацию для новичков. http://shevcenco.da.ru |
Генерация
отчета формата MS Excel средствами ASP
Автор: Gopikrishna, ASPWatch
Достаточно часто возникают ситуации, когда необходимо некоторые данные отобразить в броузер в формате 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.
<Назад>
<Sub Main> <Download
Centre> <Guest Book & Forum> <Contact Info> <Add Links>
|
|