| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 2834 人关注过本帖
标题:ADODB.Recordset 错误 '800a0cb3'
取消只看楼主 加入收藏
huade
Rank: 1
来 自:廣州
等 级:新手上路
帖 子:244
专家分:0
注 册:2008-1-25
结帖率:80%
收藏
 问题点数:0 回复次数:5 
ADODB.Recordset 错误 '800a0cb3'
ADODB.Recordset 错误 '800a0cb3'

当前记录集不支持更新。这可能是提供程序的限制,也可能是选定锁定类型的限制。

/myweb/in_main/cus.asp,行 41


cus.asp

Set rs=Server.CreateObject("ADODB.Recordset")
sql="SELECT * FROM MS_luiyanbiao"
rs.Open sql,conn,1,3
rs.Addnew  '41行
rs("biaoti")=biaoti
rs("namee")=namee
rs("add")=add
rs("phone")=phone
rs("email")=mail
rs("content")=content
rs.Close
Set rs=Nothing
response.write "<SCRIPT language=JavaScript>alert('提交成功');"
response.write "this.location.href='"& session("url") & "';</SCRIPT>"

%>
搜索更多相关主题的帖子: Recordset ADODB 
2008-05-26 11:15
huade
Rank: 1
来 自:廣州
等 级:新手上路
帖 子:244
专家分:0
注 册:2008-1-25
收藏
得分:0 
改之后还是一样
[bo][un]SkyGull[/un] 在 2008-5-26 11:33 的发言:[/bo]

用addnew

后面要跟update...

rs("content")=content
rs.update
rs.Close


cus.asp

Set rs=Server.CreateObject("ADODB.Recordset")
sql="SELECT * FROM MS_luiyanbiao"
rs.Open sql,conn,1,3
rs.Addnew  '41行
rs("biaoti")=biaoti
rs("namee")=namee
rs("add")=add
rs("phone")=phone
rs("email")=mail
rs("content")=content
rs.Close
rs.Update
Set rs=Nothing
response.write "<SCRIPT language=JavaScript>alert('提交成功');"
response.write "this.location.href='"& session("url") & "';</SCRIPT>"

%>
2008-05-26 11:40
huade
Rank: 1
来 自:廣州
等 级:新手上路
帖 子:244
专家分:0
注 册:2008-1-25
收藏
得分:0 
不好意思,复制的时候少了
[bo][un]tianyu123[/un] 在 2008-5-26 12:05 的发言:[/bo]

rs.Update要加在rs.close之前

rs.Update
rs.Close



cus.asp 整个文件内容
<%@CODEPAGE="936"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.
<html xmlns="http://www.
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<!--#include file="../include/conn.asp"-->
<script type="text/javascript" language="javascript">
var Default_isFT = 1        //默认是否繁体,0-简体,1-繁体
</script>
<%
session("url")=request.ServerVariables("HTTP_REFERER")
server_vv=len(Request.ServerVariables("SERVER_NAME"))
server_v1=left(Cstr(Request.ServerVariables("HTTP_REFERER")),server_vv)
server_v2=left(Cstr("http://"&Request.ServerVariables("SERVER_NAME")),server_vv)
if server_v1<>server_v2 or server_v1="" or server_v1="" then
response.write("<script>alert('警告:禁止從站外部提交數据!')</script>")
response.end
end if

If Request("biaoti")="" Then
    Response.Write"<br><center><font color=#ff0000>數據意外丟失![<a href='javascript:history.go(-1)'>返回</a>]</font></center>"    
    Response.End
End If
biaoti=trim(request("biaoti"))
namee=trim(request("namee"))
add=trim(request("add"))
phone=trim(request("phone"))
email=trim(request("email"))
content=trim(request("content"))

if len(biaoti)>100 or len(biaoti)<3  then
      response.write "<script language='javascript'>" & chr(13)
      response.write "alert('標題文字應在3-100個字符之間!');" & Chr(13)
      response.write "window.document.location.href='in_customermessagex.asp';"&Chr(13)
      response.write "</script>" & Chr(13)
      Response.End
    End if
%>
</head>
<body>
<a id="StranLink"></a>
<script type="text/javascript" src="s2t.js" charset="gbk"></script>
<%
Set rs=Server.CreateObject("ADODB.Recordset")
sql="SELECT * FROM MS_luiyanbiao"
rs.Open sql,conn,1,3
rs.Addnew
rs("biaoti")=biaoti
rs("namee")=namee
rs("add")=add
rs("phone")=phone
rs("email")=mail
rs("content")=content
rs.Update
rs.Close
Set rs=Nothing
response.write "<SCRIPT language=JavaScript>alert('提交成功');"
response.write "this.location.href='"& session("url") & "';</SCRIPT>"
response.Redirect "in_customermessage.asp" %>
</body>
</html>
2008-05-26 12:07
huade
Rank: 1
来 自:廣州
等 级:新手上路
帖 子:244
专家分:0
注 册:2008-1-25
收藏
得分:0 
老是提示这行出错  rs.Addnew  ,我一出去不转换繁体就可以,不知道什么问题,有请高手踢教
2008-05-26 12:10
huade
Rank: 1
来 自:廣州
等 级:新手上路
帖 子:244
专家分:0
注 册:2008-1-25
收藏
得分:0 
[bo][un]yms123[/un] 在 2008-5-26 15:56 的发言:[/bo]

有可能是数据库问题,楼主用的是什么数据库?


我用的是ACCESS數據庫,版主有什么提示吗?都好几天了,烦~~~
2008-05-26 17:30
huade
Rank: 1
来 自:廣州
等 级:新手上路
帖 子:244
专家分:0
注 册:2008-1-25
收藏
得分:0 
问题己解决
[bo][un]ilovey4[/un] 在 2008-5-27 09:07 的发言:[/bo]

看看你那表明写错了没
按常理说应该是liuyanbiao   你写的是luiyanbiao
仔细检查下



原来是我的数据库上层文件夹的权限问题,将机器名的写入打上勾就好了
2008-05-27 09:39
快速回复:ADODB.Recordset 错误 '800a0cb3'
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.044840 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved