主题:  0x800A0E78,是何种错误

小小菜皮

职务:普通成员
等级:1
金币:1.0
发贴:180
#12002/10/23 16:47:05
我尝试做一个用户登录系统,调试时出现如下提示:
错误类型:
ADODB.Recordset (0x800A0E78)
/article/check.asp, 第 34 行
浏览器类型:
Mozilla/4.0 (compatible; MSIE 6.0b; Windows NT 5.0)
页:
POST 53 bytes to /article/check.asp
POST 数据:
uID=kkkk&pwd=kk2000&imageField.x=0&imageField.y=0

请问大家能告诉一下是哪里的问题吗?
我是一个菜鸟,请大家多多包涵!

编辑历史:[这消息被小小菜皮编辑过(编辑时间2002-10-23 16:47:50)]


5D荣誉版主

职务:普通成员
等级:1
金币:10.0
发贴:271
#22002/10/23 17:26:00
imageField.x=0&imageField.y=0 什么意思啊
贴出代码看看?



5D荣誉版主

职务:普通成员
等级:1
金币:10.0
发贴:271
#32002/10/23 17:39:22
看看帮助(关于0x800A0E78):
When you use the Database Results Wizard, the following error occurs:

The server encountered an error while processing a database request. For more information, click Details:

If you click the Details button, an error similar to the following occurs:
Server error: Unable to retrieve the list of record sources from a database using the connection string:

DRIVER={Microsoft Access Driver (*.mdb)};DBQ=URL=fpdb/database.mdb.
The following error message comes from the database driver software; it may appear in a different language depending on how the driver is configured.
-------------------------------------------------------

Source: ADO
Number: -2146824584 (0x800a0e78)
Note that the actual text of the error may vary depending on the type of database you are attempting to connect to.

This error is only produced in the Database Results Wizard if you are connecting through one of the desktop database ODBC drivers. These errors do not occur connecting to a SQL Server data source.



CAUSE
Database functionality in FrontPage 2000 uses Active Server Pages (ASP) to call ActiveX Data Objects (ADO). Not all of the ADO components are installed on the server. This is the case if the server administrator installs the FrontPage 2000 Server Extensions and does not install the FrontPage 2000 Client on the Web server or does not separately install MDAC 2.1. The installation of the FrontPage 2000 or Office 2000 client installs all of the required database functionality.



RESOLUTION
There are two methods for the Web server administrator to resolve this problem.

For all supported Web servers running on Windows:

Install Microsoft Data Access Components 2.1 or later on the Web server. MDAC 2.1 can be downloaded from the following Web site:

www.microsoft.com/data/download.htm
For all supported Web servers running on Windows x86 systems:

Install the FrontPage 2000 or Office 2000 client on the Web server.



STATUS
This behavior is by design. The standalone FrontPage Server Extensions installation does not install MDAC 2.1. This problem was corrected in MDAC 2.5.




MORE INFORMATION
Note that FrontPage 2000 Database features work only on Web servers running ASP.


Additional query words: front page fpodbc

Keywords : fpse2000
Issue type : kbprb
Technology : kbvcSearch



小小菜皮

职务:普通成员
等级:1
金币:1.0
发贴:180
#42002/10/24 13:10:21
谢谢两位,昨天的问题原来真是数据库连结有问题,已经好了。可是今天调试注册时又出现了问题,无论输入什么用户名,都说是该用户已经存在。请大家帮我看看:

<%
response.buffer="True"
If request.form("pwd")<>request.form("cpwd") Then
response.write ""
response.end
End If
%>

<%
dim rs_t
dim sql_t
dim uID,pwd,cpwd,email
uID=Request.form("uID")
pwd=Request.form("pwd")
cpwd=Request.form("cpwd")
email=Request.form("email")
rname=Request.form("rname")
set rs_t=Server.CreateObject("adodb.recordset")
sql_t ="select uID from member where uID='"&uID&"'"
rs_t.open sql_t,conn,1,1
If not rs_t.eof then
response.write ""
response.end
End If

dim rs,sql
set rs=Server.CreateObject("Adodb.Recordset")
sql="select * from member where (id is null)"
rs.open sql,conn,1,3
rs.addnew
rs("uID")=uID
rs("pwd")=pwd
rs("rname")=rname
rs("email")=email
rs("date")=date()
rs("time")=time()
rs("ip")=request.ServerVariables("REMOTE_ADDR")
rs.update
rs_t.close
set rs_t=nothing
rs.close
set rs=nothing
conn.close
set conn=nothing
Response.cookies("member")="true"
Response.cookies("uID")=uID
Response.cookies("times")="1"
Response.cookies("fabu")="0"
%>





5D荣誉版主

职务:普通成员
等级:1
金币:10.0
发贴:271
#52002/10/24 13:46:08
不知道你的程序报什么错,不过试试这个行不行
<%
response.buffer="True"
If request.form("pwd")<>request.form("cpwd") Then
response.write ""
response.end
End If
%>

<%
dim rs_t
dim sql_t
dim uID,pwd,cpwd,email
uID=Request.form("uID")
pwd=Request.form("pwd")
cpwd=Request.form("cpwd")
email=Request.form("email")
rname=Request.form("rname")
set rs_t=Server.CreateObject("adodb.recordset")
sql_t ="select uID from member where uID='"&uID&"'"
rs_t.open sql_t,conn,1,1
If not rs_t.eof then
response.write ""
response.end
End If
rs_t.Close
rs_t.close
set rs_t=nothing

dim sql,rs
set rs=Server.CreateObject("Adodb.Recordset")
sql="select * from member"
rs.open sql,conn,1,3
rs.addnew
rs("uID")=uID
rs("pwd")=pwd
rs("rname")=rname
rs("email")=email
rs("date")=date()
rs("time")=time()
rs("ip")=request.ServerVariables("REMOTE_ADDR")
rs.update

rs.close
set rs=nothing

conn.close
set conn=nothing
Response.cookies("member")="true"
Response.cookies("uID")=uID
Response.cookies("times")="1"
Response.cookies("fabu")="0"
%>



5D荣誉版主

职务:普通成员
等级:1
金币:10.0
发贴:271
#62002/10/24 13:48:50
sorry,写了两遍rs_t.close的



lfg

职务:普通成员
等级:1
金币:0.0
发贴:27
#72002/10/24 13:51:23
小小菜皮在上个帖子中说
引用:
谢谢两位,昨天的问题原来真是数据库连结有问题,已经好了。可是今天调试注册时又出现了问题,无论输入什么用户名,都说是该用户已经存在。请大家帮我看看:

<%
response.buffer="True"
If request.form("pwd")<>request.form("cpwd") Then
response.write ""
response.end
End If
%>

<%
dim rs_t
dim sql_t
dim uID,pwd,cpwd,email
uID=Request.form("uID")
pwd=Request.form("pwd")
cpwd=Request.form("cpwd")
email=Request.form("email")
rname=Request.form("rname")
set rs_t=Server.CreateObject("adodb.recordset")
sql_t ="select uID from member where uID='"&uID&"'"
rs_t.open sql_t,conn,1,1
If not rs_t.eof then
response.write ""
response.end
End If

.......



sql_t ="select uID from member where uID='"&uID&"'"
rs_t.open sql_t,conn,1,1
If not rs_t.eof then

//uID ?? 是什么?
如果是自动编号(access)或标识主键(SQLserver)则不需要

//增加 bof的判断~~
if not (rs_t.bof and rs_t.eof) then
......

编辑历史:[这消息被lfg编辑过(编辑时间2002-10-24 13:55:00)]


lfg

职务:普通成员
等级:1
金币:0.0
发贴:27
#82002/10/24 14:09:22
小小菜皮在上个帖子中说
引用:
谢谢两位,昨天的问题原来真是数据库连结有问题,已经好了。可是今天调试注册时又出现了问题,无论输入什么用户名,都说是该用户已经存在。请大家帮我看看:

==================


<%
response.buffer=True '---------去掉引号

dim rs,sql
dim uID,pwd,cpwd,email,rname
uID=Request.form("uID")
pwd=Request.form("pwd")
cpwd=Request.form("cpwd")
email=Request.form("email")
rname=Request.form("rname")

If pwd<>cpwd Then '---------0

response.write ""
response.end

Else '--------0 if

set rs=Server.CreateObject("adodb.recordset")
sql="select uID from [member] where uID='"&uID&"'"
rs.open sql,conn,1,1

IF not rs.bof and not rs.eof then '------1
response.write ""
response.end
eLSE '------------------------1 if

rs.close

sql="select * from [member]"
rs.open sql,conn,1,3
rs.addnew
rs("uID")=uID
rs("pwd")=pwd
rs("rname")=rname
rs("email")=email
rs("date")=date()
rs("time")=time()
rs("ip")=request.ServerVariables("REMOTE_ADDR")
rs.update

rs.close
set rs=nothing

conn.close
set conn=nothing

Response.cookies("member")="true"
Response.cookies("uID")=uID
Response.cookies("times")="1"
Response.cookies("fabu")="0"
%>

<%
eND if '---------------1 if 镶套在If ..else ...end if中确保程序流程~~~~
End if '-----------------0 if
%>

=================



给你详细的看了一编,改了一下几个地方!
另你输入的用户名是“uID”还是"rname"
实在看不出还有什么错了!只是更严格的加上bof 和if..else..end if俩处
response.buffer=true true不用引号的,
然后调整了冗余的部分,只建立一个recordeset 重复使用就行了!

如果这样也错~~!!没招了!

编辑历史:[这消息被lfg编辑过(编辑时间2002-10-24 14:16:01)]
[这消息被lfg编辑过(编辑时间2002-10-24 14:34:22)]
[这消息被lfg编辑过(编辑时间2002-10-24 14:43:51)]
[这消息被lfg编辑过(编辑时间2002-10-24 14:44:30)]
[这消息被lfg编辑过(编辑时间2002-10-24 14:44:59)]
[这消息被lfg编辑过(编辑时间2002-10-24 14:49:54)]


小小菜皮

职务:普通成员
等级:1
金币:1.0
发贴:180
#92002/10/24 22:05:10
再次感谢dtmyou和lfg两位大侠对我帮助,问题原来出在

这一句上,似乎一开始调用的conn.asp要和该文件在同一目录,我把根目录的conn.asp拷入该页的目录,然后路径换成
居然就可以用了。

两位费心了。实在是谢谢,谢谢。可惜大家不在同一城市,不然我请喝茶。



cnecard

职务:普通成员
等级:1
金币:0.0
发贴:9
#102002/11/7 11:33:12
你真的是比较菜哦!