<%
Response.ContentType = "application/excel"
Response.AddHeader "Content-Disposition", "attachment;filename=""xxxx.xls"""
%>
<table>
<%while not rs.eof %>
<tr><td>你的excel單元格內容，有多個自己增加td</td></tr>
<%
?rs.movenext
?wend
%>
</table>