UC知道ASP代码问题!求高手解答!谢谢!
来源：百度知道 编辑：UC知道 时间：2024/05/26 16:36:01
我写了一个关于ASP显示数据库字段内容的ASP页面,运行后出现下面错误:
错误类型：
ADODB.Recordset (0x800A0CC1)
在对应所需名称或序数的集合中，未找到项目。
/liuyan/userinfo.asp, 第 25 行
我的页面代码如下:
<%
Dim objConn,connstr
Dim objRS,sqlStr
Dim Page,thePageSize,ttlpage,i
thepagesize=5
page=Request("page")
If Not IsNumeric(page) Then page=1 Else page=CLng(page)
If page<1 Then page=1
Set objconn=Server.CreateObject("ADODB.Connection")
connStr="provider=Microsoft.Jet.OLEDB.4.0;Data Source="&_
Server.MapPath("/include/#mydb.mdb")
objConn.Open connstr
Set objRS=Server.CreateObject("ADODB.RecordSet")
sqlStr="SELECT*FROM contents"
objRS.Open sqlStr,objConn,1,1
If Not objRS.EOF Then
objRS.pagesize=thepagesize
ttlpage=objRS.PageCount
If page>ttlPage Then page=ttlPage
objRS.AbsolutePage=page
End If
For i=1 To thePagesize
If objRS.EOF Then Exit F
错误类型：
ADODB.Recordset (0x800A0CC1)
在对应所需名称或序数的集合中，未找到项目。
/liuyan/userinfo.asp, 第 25 行
我的页面代码如下:
<%
Dim objConn,connstr
Dim objRS,sqlStr
Dim Page,thePageSize,ttlpage,i
thepagesize=5
page=Request("page")
If Not IsNumeric(page) Then page=1 Else page=CLng(page)
If page<1 Then page=1
Set objconn=Server.CreateObject("ADODB.Connection")
connStr="provider=Microsoft.Jet.OLEDB.4.0;Data Source="&_
Server.MapPath("/include/#mydb.mdb")
objConn.Open connstr
Set objRS=Server.CreateObject("ADODB.RecordSet")
sqlStr="SELECT*FROM contents"
objRS.Open sqlStr,objConn,1,1
If Not objRS.EOF Then
objRS.pagesize=thepagesize
ttlpage=objRS.PageCount
If page>ttlPage Then page=ttlPage
objRS.AbsolutePage=page
End If
For i=1 To thePagesize
If objRS.EOF Then Exit F
Response.Write("单位全称:"&objRS("comply")&"<br>")
Response.Write("通信地址:"&objRS("address")&"<br>")
Response.Write("邮政编码:"&objRS("code")&"<br>")
Response.Write("负 责 人:"&objRS("name")&"<br>")
Response.Write("电 话:"&objRS("tel")&"<br>")
中有写错的字段，请仔细检查，如objRS("comply")
是否应为objRS("company")
重点检查第25行
应该是段名称写错了,要区分大小写的,请核对一下.
Response.Write "单位全称:"& objRS("comply") &"<br>"
objRS("comply")
表结构里不是 comply 吧