<% 'Build & Execute Your SQL Command strSQL = "SELECT * FROM completedata" Set rstSearch = cnnSearch.Execute(strSQL) 'Set the HTTP Header Response.ContentType = "application/vnd.ms-excel" Response.AddHeader "Content-Disposition", "filename=""Excel_Export.xls""" 'Output Table %> <% Do While Not rstSearch.EOF %> <% rstSearch.MoveNext : Loop %>

Header 1	Header 2	Header 3	Header 4	Header 5	Header 6	Header 7	Header 8	Header 9	Header 10	Header 11	Header 12	Header 13/th>	Header 14	Header 15	Header 16	Header 17	Header 18	Header 19	Header 20	Header 21	Header 22	Header 23	Header 24
<%=rstSearch(0)%>	<%=rstSearch(1)%>	<%=rstSearch(2)%>	<%=rstSearch(3)%>	<%=rstSearch(4)%>	<%=rstSearch(5)%>	<%=rstSearch(6)%>	<%=rstSearch(7)%>	<%=rstSearch(8)%>	<%=rstSearch(9)%>	<%=rstSearch(10)%>	<%=rstSearch(11)%>	<%=rstSearch(12)%>	<%=rstSearch(13)%>	<%=rstSearch(14)%>	<%=rstSearch(15)%>	<%=rstSearch(16)%>	<%=rstSearch(17)%>	<%=rstSearch(18)%>	<%=rstSearch(19)%>	<%=rstSearch(20)%>	<%=rstSearch(21)%>	<%=rstSearch(22)%>	<%=rstSearch(23)%>	<%=rstSearch(24)%>

<% 'Stop Processing Page Now Response.End %>