[ASP] creare un file excel da asp

Ecco il codice di un piccolo esempio
<% 
Dim FileName 
  FileName="mioFile.xls" 
  response.buffer = true 
  response.ContentType = "application/vnd.ms-excel" 
  response.AddHeader "content-disposition", "inline; filename=" & FileName 
  response.write "<table>" 
  for i = 1 to 5
    response.write "<tr><td>" 
    response.write i * i 
    response.write "</td></tr>" 
  next 
  response.write "<tr><td width=40><b>=somma(A1:A5)</b></td></tr>" 
  response.write "</table>" 
  response.flush 
  response.end 
%>