Export to Excel from ASP

[ss_learner]

Hi there ,
Can anyone help me out!!

I have a report (basically retrieving of records from the database and show it in a htm table format)
which is displayed on the browser as htm table..
Now my problem comes here..
I was asked to program such that the report is shown in excel rather than as html table..
with great enthusiasm I started working only to find out i am not able to do..

when I click on the button, the excel is opening, but only that it is completely blank and not showing any records
if i turn off content type, then I am able to display in html table..
Pls help me out!!
the delivarable is only a day away:(
I am posting my code here :
on top of page i added this

 <% 
Response.Buffer = TRUE
Response.ContentType = "application/vnd.ms-excel"%>
 
After that the record set is retreived like this:
<tr valign=top>    
<% while iCnt <=7%>
<td >        
<table border="1" cellpadding="0" cellspacing="0" width=100% class=formtable>
<%str = "Exec sp_printanydate '" & cdate(request("StartDate"))& "', '" & request.QueryString("cid") & "', "& iCnt&" " 
rs.Open str,conn,1,3
while not rs.EOF %>
<tr valign=top >    
<td valign=top bgcolor=<%=color_value%> >
<%if isnull(rs("subjectname")) then%>
        -
<%else%>
<%=rs("subjectname")%>
<%end if %>    <br>        
<%if isnull(rs("classname")) then%>
    - 
<%else%>
<%=rs("classname")%>
<%end if %>    <br>        
<%=rs("fromtime")%> - <%=rs("totime")%><br>
<%if isnull(rs("room")) then%>
- 
<%else%>
<%=rs("room")%>
<%end if %>        <br>    
</td>    
</tr>                
<%
rs.MoveNext        
wend
rs.Close
%>                        
</table>        
</td>    
<%iCnt=iCnt+1
wend%>
</tr>        
</table>
 

Thanks very much in advance
Regards

[Niheel]

Here is an example on the net:
Export to Excel using ASP

Comparing yours with the sample, it seems you forgot the AddHeader line:

Response.ContentType = "application/vnd.ms-excel"
Response.AddHeader "Content-Disposition", "attachment; filename=Sample_File.xls"
 

[thema3x]

I have this code, and works with no problem.

<%@ Language=VBScript %>
<% Response.ContentType="application/vnd.ms-excel" %>
<Table>
 
<TR>
<TD>Col1</TD>
<TD>Col2</TD>
<TD>Col3</TD>
<TD>Total</TD>
</TR>
 
<TR>
<TD><div align="center" class="style1">10</div></TD>
<TD>20</TD>
<TD>2</TD>
<TD>=sum(a2:b2)</TD>
</TR>
 
<TR>
<TD>30</TD>
<TD>40</TD>
<TD></TD>
<TD>=sum(a3:b3)</TD>
</TR>
</TABLE>

[mady1380]

Hi there,

I have tired this

 Response.ContentType = "application/vnd.ms-excel" 
Response.AddHeader "Content-Disposition", "attachment; filename=Enquiry_List.xls"
Response.Charset="UTF-8"
 

which works fine for me. My only problem is that, i am not getting my data in UTF-8 format. Any idea? I have searched many articles on export to excel in ASP. I have not found either in one anything regarding the Encoding issue.

Any help would be appreciated.

Thanks,
Menon