| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 777 人关注过本帖
标题:[求助]请教一下:数据库为什么写不入?
只看楼主 加入收藏
tomix
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2006-5-21
收藏
 问题点数:0 回复次数:5 
[求助]请教一下:数据库为什么写不入?

想请教一下:下面这段代码,什么地方错误?数据库为什么写不入?检查过了,数据库文件不是只读,也关闭了,有高手可以帮助一下吗?
<%
Set conn = Server.CreateObject("ADODB.Connection")
DBPath = Server.MapPath("szg.mdb")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath

Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "黑名单", conn, adOpenDynamic, adLockPessimistic
if no<>"" then
rs.AddNew
rs("学号")=no
rs("姓名")=name
rs("GRE")=Cint(gre)
rs("TOEFL")=Cint(toefl)
rs("TWE")=Cint(twe)
rs("TSE")=Cint(tse)
rs("ASP")=Cint(asp)
rs.Update
end if
rs.movefirst
rstotable rs
%>
IE预览时提示:
错误类型:
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC Microsoft Access Driver] 不能更新。数据库或对象为只读。

搜索更多相关主题的帖子: 数据库 Microsoft Set conn 
2006-05-21 08:24
本刚
Rank: 1
等 级:新手上路
威 望:1
帖 子:192
专家分:0
注 册:2005-12-3
收藏
得分:0 
数据库的相关语句在哪呢

我的网站 http://6asp. 欢迎指教。
2006-05-21 09:06
tomix
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2006-5-21
收藏
得分:0 

数据库是:"szg.mdb",同文件夹下,并且是非只读的.
"add.asp"全文件如下:

<!--#include file="adovbs.inc" -->
<%
no=request("no")
name=request("name")
gre=request("gre")
toefl=request("toefl")
tse=request("tse")
twe=request("twe")
asp=request("asp")
%>
<%
Set conn = Server.CreateObject("ADODB.Connection")
DBPath = Server.MapPath("szg.mdb")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath

Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "黑名单",conn,adOpenDynamic,adLockPessimistic
if no<>"" then
rs.AddNew
rs("学号")=no
rs("姓名")=name
rs("GRE")=Cint(gre)
rs("TOEFL")=Cint(toefl)
rs("TWE")=Cint(twe)
rs("TSE")=Cint(tse)
rs("ASP")=Cint(asp)
rs.Update
end if
%>
<html>
<head>
</head>
<body bgcolor=beige>
<form action="add.asp" method=post>
我要添加一个新人:哈哈,哈哈哈!<br>
学号:<input type=text name=no size=10><br>
姓名:<input type=text name=name size=10><br>
GRE:<input type=text name=gre size=10><br>
TOEFL:<input type=text name=toefl size=10><br>
TSE:<input type=text name=tse size=10><br>
TWE:<input type=text name=twe size=10><br>
ASP:<input type=text name=asp size=10><br>
<input type=submit value=添加 id=submit1 name=submit1>
</form>

</body>
</html>
就是不明白为什么有错误

2006-05-21 12:18
tomix
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2006-5-21
收藏
得分:0 
高手帮忙一下麻
2006-05-21 15:27
小拽83
Rank: 1
等 级:新手上路
帖 子:24
专家分:0
注 册:2005-11-23
收藏
得分:0 
"adOpenDynamic, adLockPessimistic"是不是这两个参数设置的不正确!
2006-05-21 15:57
jimn2000
Rank: 2
等 级:新手上路
威 望:3
帖 子:274
专家分:0
注 册:2006-4-3
收藏
得分:0 
我猜可能是这里的缘故吧。
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "黑名单",conn,adOpenDynamic,adLockPessimistic

你改成这样看看啊,set rs=server.createobject("adodb.recordset")
sql=select * from 黑名单
rs.open sql,conn,adopendynamic,adlockpressimistic

欢迎大家访问我的网站 www. 域名代理网站 web.
2006-05-21 16:00
快速回复:[求助]请教一下:数据库为什么写不入?
数据加载中...
 
   



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

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