在经典ASP中创建Excel文件

Question

我使用以下代码在经典ASP中创建了一个excel文件。

Set objExcel = CreateObject("Excel.Application")
objExcel.Visible = TRUE
objExcel.Workbooks.Add

Set objWorksheet = objExcel.Worksheets("Sheet2")
objWorksheet.Activate

objWorksheet.Cells(1, 1).Value = "A"

我有以下错误。

Microsoft Office Excel (0x800A03EC)
Microsoft Office Excel cannot open or save any more documents because there is not enough available memory or disk space. • To make more memory available, close workbooks or programs you no longer need. • To free disk space, delete files you no longer need from the disk you are saving to.

我该如何解决？ 谢谢。

Answer 1

建议您不要考虑将数据作为大HTML表输出，并强制浏览器执行以下操作，而不是创建Excel实例来创建文件（我一直发现这种方法会泄漏内存并最终导致Classic ASP失败）。在响应开始时，使用以下命令在Excel中打开它：

<%
response.ContentType = "application/vnd.ms-excel"
response.AppendHeader "content-disposition", " filename=export.xls"
%>