ADODB.Field 问题（代码发上来了） - ASP技术论坛

楼主

问题点数：0 回复次数：12

ADODB.Field 问题（代码发上来了）

无法显示网页
试图访问的网页出现问题，无法显示。

--------------------------------------------------------------------------------

请尝试执行下列操作：

单击刷新按钮，或稍后重试。

打开 localhost 主页，然后查找与所需信息相关的链接。
HTTP 错误 500.100 - 内部服务器错误 - ASP 错误
Internet 信息服务

--------------------------------------------------------------------------------

技术信息（用于支持人员）

错误类型：
ADODB.Field (0x800A0BCD)
BOF 或 EOF 中有一个是“真”，或者当前的记录已被删除，所需的操作要求一个当前的记录。
/ReadBooks/index.asp, 第 49 行

浏览器类型：
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 2.0.50727)

网页：
GET /ReadBooks/index.asp

时间：
2007年7月4日, 12:36:10

详细信息：
Microsoft 支持

[此贴子已经被作者于2007-7-4 13:39:47编辑过]

搜索更多相关主题的帖子: Field　ADODB　发上　代码　

第 2 楼

得分:0

/ReadBooks/index.asp, 第 49 行

代码啊！兄弟！！！没贴代码，让我看这个有什么用？

论坛是我家灌水靠大家

第 3 楼

得分:0

这种情况，多半是由于你的sql语句里要找的数据不存在，
一般可以加一句
if rs.eof and rs.bof then
response.write "你要找的数据不存在"

第 4 楼

得分:0

这个是代码

[此贴子已经被作者于2007-7-4 13:31:19编辑过]

第 5 楼

得分:0

hdirZmIK.txt (2.46 KB) 无法显示网页 ADODB.Field 问题

代码我不会贴代码

CZZ1MyMc.txt (2.46 KB) 无法显示网页 ADODB.Field 问题

第 6 楼

得分:0

代码如下
[CODE]
<%
Dim Recordset_novel
Dim Recordset_novel_numRows
Set Recordset_novel = Server.CreateObject("ADODB.Recordset")
Recordset_novel.ActiveConnection = MM_connect_STRING
Recordset_novel.Source = "SELECT * FROM novel ORDER BY time DESC"
Recordset_novel.CursorType = 0Recordset_novel.CursorLocation = 2
Recordset_novel.LockType = 1
Recordset_novel.Open()Recordset_novel_numRows = 0%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
<style type="text/css">

</style>
</head>
<body>
<table width="100%" border="0">
<tr>
<td colspan="3"><img src="Image/novel_logo1.jpg" width="340" height="59" /></td>
</tr>
<tr>
<td colspan="3"> </td>
</tr>
<tr>
<td width="27%" rowspan="2">
<table width="100%" border="0" cellspacing="1" bgcolor="#000000">
<tr>
<td bgcolor="#FFFFFF"><div align="right"></div></td>
</tr>
</table>
</td>
<td width="36%">
<table width="100%" border="0" cellspacing="1" bgcolor="#000000">
<tr>
<td height="17" bgcolor="#FFFFFF">类型1</td>
</tr>
<tr>
<td bgcolor="#FFFFFF"><%=(Recordset_novel.Fields.Item("title").Value)%></td>
</tr>
</table>
</td>
<td width="37%">
<table width="100%" border="0" cellspacing="1" bgcolor="#000000">
<tr>
<td bgcolor="#FFFFFF">类型2</td>
</tr>
<tr>
<td bgcolor="#FFFFFF"> </td>
</tr>
</table>
</td>
</tr>
<tr>
<td>
<table width="100%" border="0" cellspacing="1" bgcolor="#000000">
<tr>
<td bgcolor="#FFFFFF">类型3</td>
</tr>
<tr> <td bgcolor="#FFFFFF"> </td>
</tr>
</table>
</td>
<td width="37%">
<table width="100%" border="0" cellspacing="1" bgcolor="#000000">
<tr>
<td bgcolor="#FFFFFF">类型4</td>
</tr>
<tr>
<td bgcolor="#FFFFFF"> </td>
</tr>
</table>
</td>
</tr>
<tr> <td colspan="3"><img src="Image/bottom.gif" width="800" height="150" /></td>
</tr>
</table>
</body>
</html>
<%Recordset_novel.Close()Set Recordset_novel = Nothing%>[/CODE]
代码太乱，不利于别人分析，这次先帮你改一下。

第 7 楼

得分:0

谢谢楼上的我刚才用论坛上的那个“程序代码”的功能怎么贴不上啊

这段是connect.asp的代码

<%
' FileName="Connection_ado_conn_string.htm"
' Type="ADO"
' DesigntimeType="ADO"
' HTTP="true"
' Catalog=""
' Schema=""
Dim MM_connect_STRING
MM_connect_STRING = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\inetpub\wwwroot\Readbooks\fiction.mdb;Mode=ReadWrite|Share Deny None;Persist Security Info=False"
%>

[此贴子已经被作者于2007-7-4 13:49:58编辑过]