|
|
主题: 程序调试出错专答区
|
蓝鲸
职务：版主
等级：5
金币：42.1
发贴：2614
注册：2001/12/20 15:57:57
|
#162005/2/12 22:20:28
也可能是程序的BUG吧，可能是数据库中是空数据，比如设置或管理员信息等，在非空数据记录时不会出错。
dvbbs程序很复杂，也没去研究结构，所以也只是猜测。
非常大鱼
|
AdderKing
职务：普通成员
等级：1
金币：0.0
发贴：12
注册：2005/2/17 13:34:15
|
#172005/2/20 22:51:34
我是asp菜鸟 请问我做分页的时候用到pagecount 可是怎么都不对
于是我用
response.write rs.pagecount打印一下 可是提示我
Microsoft VBScript 运行时错误 错误 '800a01a8'
缺少对象
请问什么问题
还有pagecount并不是所有的数据提供者都支持 我怎么知道呢
|
蓝鲸
职务：版主
等级：5
金币：42.1
发贴：2614
注册：2001/12/20 15:57:57
|
#182005/2/21 0:41:48
Adder在上个帖子中说 引用:
我是asp菜鸟 请问我做分页的时候用到pagecount 可是怎么都不对
于是我用
response.write rs.pagecount打印一下 可是提示我
Microsoft VBScript 运行时错误 错误 '800a01a8'
缺少对象
请问什么问题
还有pagecount并不是所有的数据提供者都支持 我怎么知道呢
可能是你的Recordset对象不正确，用Execute的Rs并不是Recordset对象，不能用pagecount，你是否是这个原因。
非常大鱼
|
AdderKing
职务：普通成员
等级：1
金币：0.0
发贴：12
注册：2005/2/17 13:34:15
|
#192005/2/21 9:56:00
我连接数据库是这样的
SET CONN =SERVER.CREATEOBJECT("ADODB.CONNECTION")
SET RS=SERVER.CEREATOBJECT("adodb.recordset")
sql="select * from option oder by id desc"
rs.open sql,conn,1,1
|
蓝鲸
职务：版主
等级：5
金币：42.1
发贴：2614
注册：2001/12/20 15:57:57
|
#202005/2/21 14:08:33
option和id都是专用词，需用[]，[id]
非常大鱼
|
AdderKing
职务：普通成员
等级：1
金币：0.0
发贴：12
注册：2005/2/17 13:34:15
|
#212005/2/22 12:16:42
好用了 非常感谢;)
|
juzisusu
职务：普通成员
等级：1
金币：0.0
发贴：5
注册：2005/2/25 9:36:30
|
#222005/2/25 9:49:35
<% if request.Form<>"" then UserName =Request.Form("UserName"  password=request.Form("password" Email =Request.Form("Email" HomePage =Trim(Request.Form("HomePage" ) qq=request.Form("QQ" sex =Request.Form("sex" Face =Request.Form("Face" if homepage="http://" then homepage="" Set rs=server.createobject("ADODB.RECORDSET" rs.open "Select * From register where username="& request("username" ,Conn,3,3 if rs.eof then sql="Insert Into register (username,password1,mail,homepage,face,sex,qq) values('"& UserName&"','"& md5(password)&"','"&email&"','"&homepage&"','"&face&"','"&sex&"','"&qq&"')" conn.Execute sql cookiePath=request.servervariables("path_info" cookiePath=left(cookiePath,instrRev(cookiePath,"/" ) response.cookies("ly" .Path=cookiePath response.cookies("ly" ("useridname" =username response.cookies("ly" ("useridpassword" =password else response.Redirect "error.asp?type=usrname" end if response.Redirect "post_ok.asp?info=注册成功！" rs.close set rs=nothing conn.close set conn=nothing response.end end if %> 一个注册用户的程序，不论怎么注册都报“ rs.open "Select * From register where username="& request("username" ,Conn,3,3”这行有问题！ 不知道知道怎么解决，请帮帮忙吧！
|
juzisusu
职务：普通成员
等级：1
金币：0.0
发贴：5
注册：2005/2/25 9:36:30
|
#232005/2/25 9:52:19
<%
if request.Form<>"" then
UserName =Request.Form("UserName")
password=request.Form("password")
Email =Request.Form("Email")
HomePage =Trim(Request.Form("HomePage"))
qq=request.Form("QQ")
sex =Request.Form("sex")
Face =Request.Form("Face")
if homepage="http://" then homepage=""
Set rs=server.createobject("ADODB.RECORDSET")
rs.open "Select * From register where username="& request("username"),Conn,3,3
if rs.eof then
sql="Insert Into register (username,password1,mail,homepage,face,sex,qq) values('"& UserName&"','"& md5(password)&"','"&email&"','"&homepage&"','"&face&"','"&sex&"','"&qq&"')"
conn.Execute sql
cookiePath=request.servervariables("path_info")
cookiePath=left(cookiePath,instrRev(cookiePath,"/"))
response.cookies("ly").Path=cookiePath
response.cookies("ly")("useridname")=username
response.cookies("ly")("useridpassword")=password
else
response.Redirect "error.asp?type=usrname"
end if
response.Redirect "post_ok.asp?info=注册成功！"
rs.close
set rs=nothing
conn.close
set conn=nothing
response.end
end if
%>
编辑历史:[此帖最近一次被 allinhands 编辑过(编辑时间:2005-02-25 10:10:03)]
|
juzisusu
职务：普通成员
等级：1
金币：0.0
发贴：5
注册：2005/2/25 9:36:30
|
#242005/2/25 9:55:06
怎么会出现这么多笑脸符号的？真是搞不懂
|
缺缺
职务：管理员
等级：8
金币：41.0
发贴：9620
注册：2004/1/14 19:14:47
|
#252005/2/25 10:16:14
rs.open "Select * From register where username='"& request("username")&"'",Conn,3,3
字符串需要引号
下次发代码请使用[code][/code]标签,或者勾选"禁止转换表情图标"
|
juzisusu
职务：普通成员
等级：1
金币：0.0
发贴：5
注册：2005/2/25 9:36:30
|
#262005/2/25 13:42:39
在哪加引号？
|
蓝鲸
职务：版主
等级：5
金币：42.1
发贴：2614
注册：2001/12/20 15:57:57
|
#272005/2/26 21:49:34
UserName是字符类型，用单型号
如:SELECT * FROM Register WHERE UserName = '张军'
非常大鱼
|
AdderKing
职务：普通成员
等级：1
金币：0.0
发贴：12
注册：2005/2/17 13:34:15
|
#282005/2/28 11:10:20
我做了一个网上调查生成系统 突然出了一个错误 Microsoft VBScript 编译器错误 错误 '800a03f6' 缺少 'End' /iisHelp/common/500-100.asp，行242 Microsoft VBScript 运行时错误 错误 '800a01fb' 出现一个意外错误: 'server.createobject' /jtest/survye/conn.asp，行2 我的conn.asp 是这样写的 set conn=server.createobject("adodb.connection" conn.open "provider=microsoft.jet.oledb.4.0;data source="&server.mappath("data/survey.mdb" 然后在其他文件中用<!--include file="conn.asp"--> 请问是什么问题
|
AdderKing
职务：普通成员
等级：1
金币：0.0
发贴：12
注册：2005/2/17 13:34:15
|
#292005/2/28 11:11:35
还有怎样能够避免在运行时出现错误
用on error goto ?
|
蓝鲸
职务：版主
等级：5
金币：42.1
发贴：2614
注册：2001/12/20 15:57:57
|
#302005/2/28 11:21:52
检查数据库路径错误，比如主文件与包含文件不在同一目录，路径应以主文件路径相对应。
一般情况下避免使用on error，除了不可避免的原因，如控件或版本原因，如邮件控件不同或上传组件不同等，用on error resume next或忽略错误，on error resume 0重新恢复出错机制
非常大鱼
|
