Question

调试asp出现如下问题：Microsoft VBScript 运行时错误 错误 '800a01a8' 缺少对象: '' /index.asp，行 158

行158： <% While ((Repeat1__numRows <> 0) AND (NOT Recordset2.EOF)) %>
我的部分代码是
<%
Dim Recordset2
Dim Recordset2_numRows

Set Recordset2 = Server.CreateObject("ADODB.Recordset")
Recordset2.ActiveConnection = MM_conn1_STRING
Recordset2.Source = "SELECT * FROM user ORDER BY id ASC"
Recordset2.CursorType = 0
Recordset2.CursorLocation = 2
Recordset2.LockType = 1
Recordset2.Open()

Recordset2_numRows = 0
%>
到底哪里有问题啊

Answer 1

这句话是没有错误的，asp提示错误有时候经常是在这句话的前后某个地方出错，，按照题意猜测缺少对象的话是不是你没有建立记录集命令，目测Recordset2.EOF这个的前面是否已经建立记录集比如

set rs = server.createObject("adodb.recordset")这句命令，没有使用的话都会提示的哦，，或者你使用response.end打印看看，具体在哪里出现问题了。。。

追问

再看下我的问题，我又加了点，谢谢

Answer 2

从你上面的代码可以看出，你的代码中有一个对象的调用Recordset2.EOF
但是Recordset2这个并不是对象，或者这个对象不存在
然后就会出现这个错误 “缺失对象”