
ADODB.Recordset (0x800A0BCD)BOF 或 EOF 中有一个是“真”,或者当前的记录已被删除 5
错误:HTTP错误500.100-内部服务器错误-ASP错误Internet信息服务-------------------------------------------...
错误:
HTTP 错误 500.100 - 内部服务器错误 - ASP 错误
Internet 信息服务
--------------------------------------------------------------------------------
技术信息(用于支持人员)
错误类型:
ADODB.Recordset (0x800A0BCD)
BOF 或 EOF 中有一个是“真”,或者当前的记录已被删除,所需的操作要求一个当前的记录。
/数据库连接Recordset.asp, 第 25 行
浏览器类型:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; CIBA; .NET CLR 2.0.50727)
网页:
GET /数据库连接Recordset.asp
时间:
2009年8月28日 星期五, 14:36:47
源代码:
<html>
<head>
<title>演示对象Recordset的使用</title>
</head>
<body>
<%
'Server对象的CreateObject方法建立Connection对象
Set Conn=Server.CreateObject("ADODB.Connection")
'设置Connection对象的ConnectionString
'Driver表示ODBC驱动程序
'Server表示数据库服务器名称
Conn.ConnectionString="Provider=SQLNCLI.1;Password=sa;Persist Security Info=True;User ID=sa;Initial Catalog=MYSQLDB;Data Source=localhost"
Conn.Open
'定义Recordset对象
Set rs=Server.CreateObject("ADODB.RecordSet")
'设置rs的ActiveConnection的属性,绑定到连接
Set rs.ActiveConnection = Conn
'设置游标类型
rs.cursortype = 3
'打开记录集
rs.Open"SELECT * FROM Departments"',Conn,adOpenDynamic,adCMDText
'显示记录集中记录数量
Response.Write("表Departments中包含"&CStr(rs.RecordCount)&"条记录<br>")
'移动指针到记录集的最后
rs.Move rs.RecordCount
'判断rs.EOF属性
if rs.EOF=true then
Response.write("已经到达记录集的结尾,Move方法和EOF属性检测正常")
End if
'断开与数据库的连接
Conn.Close
'释放Connection对象,关闭数据库
Set Conn=nothing
%>
</body>
</html> 展开
HTTP 错误 500.100 - 内部服务器错误 - ASP 错误
Internet 信息服务
--------------------------------------------------------------------------------
技术信息(用于支持人员)
错误类型:
ADODB.Recordset (0x800A0BCD)
BOF 或 EOF 中有一个是“真”,或者当前的记录已被删除,所需的操作要求一个当前的记录。
/数据库连接Recordset.asp, 第 25 行
浏览器类型:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; CIBA; .NET CLR 2.0.50727)
网页:
GET /数据库连接Recordset.asp
时间:
2009年8月28日 星期五, 14:36:47
源代码:
<html>
<head>
<title>演示对象Recordset的使用</title>
</head>
<body>
<%
'Server对象的CreateObject方法建立Connection对象
Set Conn=Server.CreateObject("ADODB.Connection")
'设置Connection对象的ConnectionString
'Driver表示ODBC驱动程序
'Server表示数据库服务器名称
Conn.ConnectionString="Provider=SQLNCLI.1;Password=sa;Persist Security Info=True;User ID=sa;Initial Catalog=MYSQLDB;Data Source=localhost"
Conn.Open
'定义Recordset对象
Set rs=Server.CreateObject("ADODB.RecordSet")
'设置rs的ActiveConnection的属性,绑定到连接
Set rs.ActiveConnection = Conn
'设置游标类型
rs.cursortype = 3
'打开记录集
rs.Open"SELECT * FROM Departments"',Conn,adOpenDynamic,adCMDText
'显示记录集中记录数量
Response.Write("表Departments中包含"&CStr(rs.RecordCount)&"条记录<br>")
'移动指针到记录集的最后
rs.Move rs.RecordCount
'判断rs.EOF属性
if rs.EOF=true then
Response.write("已经到达记录集的结尾,Move方法和EOF属性检测正常")
End if
'断开与数据库的连接
Conn.Close
'释放Connection对象,关闭数据库
Set Conn=nothing
%>
</body>
</html> 展开
2个回答
展开全部
<html>
<head>
<title>演示对象Recordset的使用</title>
</head>
<body>
<%
'Server对象的CreateObject方法建立Connection对象
Set Conn=Server.CreateObject("ADODB.Connection")
'设置Connection对象的ConnectionString
'Driver表示ODBC驱动程序
'Server表示数据库服务器名称
Conn.ConnectionString="Provider=SQLNCLI.1;Password=sa;Persist Security Info=True;User ID=sa;Initial Catalog=MYSQLDB;Data Source=localhost"
Conn.Open
'定义Recordset对象
Set rs=Server.CreateObject("ADODB.RecordSet")
'设置rs的ActiveConnection的属性,绑定到连接
Set rs.ActiveConnection = Conn
'设置游标类型
rs.cursortype = 3
'打开记录集
rs.Open"SELECT * FROM Departments"',Conn,1,3
'显示记录集中记录数量
Response.Write("表Departments中包含"&CStr(rs.RecordCount)&"条记录<br>")
'移动指针到记录集的最后
rs.Move rs.RecordCount
'判断rs.EOF属性
if rs.EOF=true then
Response.write("已经到达记录集的结尾,Move方法和EOF属性检测正常")
End if
'断开与数据库的连接
Conn.Close
'释放Connection对象,关闭数据库
Set Conn=nothing
%>
</body>
</html>
<head>
<title>演示对象Recordset的使用</title>
</head>
<body>
<%
'Server对象的CreateObject方法建立Connection对象
Set Conn=Server.CreateObject("ADODB.Connection")
'设置Connection对象的ConnectionString
'Driver表示ODBC驱动程序
'Server表示数据库服务器名称
Conn.ConnectionString="Provider=SQLNCLI.1;Password=sa;Persist Security Info=True;User ID=sa;Initial Catalog=MYSQLDB;Data Source=localhost"
Conn.Open
'定义Recordset对象
Set rs=Server.CreateObject("ADODB.RecordSet")
'设置rs的ActiveConnection的属性,绑定到连接
Set rs.ActiveConnection = Conn
'设置游标类型
rs.cursortype = 3
'打开记录集
rs.Open"SELECT * FROM Departments"',Conn,1,3
'显示记录集中记录数量
Response.Write("表Departments中包含"&CStr(rs.RecordCount)&"条记录<br>")
'移动指针到记录集的最后
rs.Move rs.RecordCount
'判断rs.EOF属性
if rs.EOF=true then
Response.write("已经到达记录集的结尾,Move方法和EOF属性检测正常")
End if
'断开与数据库的连接
Conn.Close
'释放Connection对象,关闭数据库
Set Conn=nothing
%>
</body>
</html>
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询