我有一个将记录集导出到excel的脚本。我的记录集有139列。我可以在fiddler中看到excel的表头是创建的,但是当我写这些值时我面临这个错误:
Microsoft Cursor Engine错误'8007000e'
内存不足。
/includes/ExportFunctions.inc,第49行
当我删除5列时,它工作得很好,即使是空值列!这对我来说很奇怪,因为我找不到记录集的任何限制,我相信我已经处理了所需的所有对象。 这是我的代码:
Response.Write "<table>" & vbCrLf
Response.Write "<tr>" & vbCrLf
For intItem = 0 To rstResult.Fields.count - 1
Response.Write "<th>" & rstResult(intItem).Name & "</th>" & vbCrLf
Next
Response.Write "</tr>" & vbCrLf
dim index
index = 0
Do While Not rstResult.EOF
Response.Write "<tr>" & vbCrLf
For intItem = 0 To rstResult.Fields.count - 1
Response.Write "<td><nobr>"
If IsNull(rstResult(intItem).Value) Then
Response.Write " "
else
Response.Write rstResult(intItem).Value
end if
Response.Write "</nobr></td>" & vbCrLf
Next
Response.Write "</tr>" & vbCrLf
Response.Flush
rstResult.MoveNext
LOOP
错误是指第49行
Do While Not rstResult.EOF
有没有人对此有所了解?