ASP为什么只能读，但是写的时候却出现“操作必须使用一个可更新的查询。”希望哪位高手告诉我怎么回事呀？
我的代码都是按照书上的写的，就是在最好还是出现：错误类型：MicrosoftOLEDBProviderforODBCDrivers(0x80004005)[Microso...
我的代码都是按照书上的写的，就是在最好还是出现：
错误类型：
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC Microsoft Access Driver] 操作必须使用一个可更新的查询。
/6-2.asp, 第 38 行
我的代码如下：
<% Option Explicit %>
<% Response.Buffer=True%>
<html>
<head>
<title> 添加新记录示例</title>
</head>
<body>
<h2 align="center">添加新网站</h2>
<center>
<table border="1" width="90%">
<form action="" method="post" name="form1">
<tr>
<td>网站名字</td><td><input type="text" name="name" size=20></td>
</tr><tr>
<td>网站网址</td><td><input type="text" name="URL" size=60></td>
</tr><tr>
<td>网站简介</td><td>
<textarea name="Intro" rows="2" cols="60" wrap="soft"></textarea></td>
</tr><tr>
<td><input type="submit" value=" 确 定 "></td>
</tr>
</form>
</table>
</center>
<%
'如果上面的信息填全了，就添加记录，否则给出错误信息
If Request("name")<>"" and Request("url")<>"" and Request("intro")<>"" Then
'以下连上数据库，建立一个Connection对象实例db
dim conn
set conn=Server.Createobject("ADODB.Connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("shujuku.mdb")
'以下添加新记录
Dim strSql,varName,varurl,varIntro
varName=Request("name") '这里也可以不定义变量，下面直接用Request("Name")
varurl=Request("url")
varIntro=Request("intro")
strSql="insert into biao1(name,url, intro) values('" & varName & "','" & varurl & "','" & varIntro & "')"
conn.execute strSql
conn.close
set conn=nothing
Response.Redirect "6-1.asp" '添加完毕，返回首页6-1.asp
Else
Response.Write "请将所有信息填写完整"
End If
%>
</body>
</html> 展开
错误类型：
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC Microsoft Access Driver] 操作必须使用一个可更新的查询。
/6-2.asp, 第 38 行
我的代码如下：
<% Option Explicit %>
<% Response.Buffer=True%>
<html>
<head>
<title> 添加新记录示例</title>
</head>
<body>
<h2 align="center">添加新网站</h2>
<center>
<table border="1" width="90%">
<form action="" method="post" name="form1">
<tr>
<td>网站名字</td><td><input type="text" name="name" size=20></td>
</tr><tr>
<td>网站网址</td><td><input type="text" name="URL" size=60></td>
</tr><tr>
<td>网站简介</td><td>
<textarea name="Intro" rows="2" cols="60" wrap="soft"></textarea></td>
</tr><tr>
<td><input type="submit" value=" 确 定 "></td>
</tr>
</form>
</table>
</center>
<%
'如果上面的信息填全了，就添加记录，否则给出错误信息
If Request("name")<>"" and Request("url")<>"" and Request("intro")<>"" Then
'以下连上数据库，建立一个Connection对象实例db
dim conn
set conn=Server.Createobject("ADODB.Connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("shujuku.mdb")
'以下添加新记录
Dim strSql,varName,varurl,varIntro
varName=Request("name") '这里也可以不定义变量，下面直接用Request("Name")
varurl=Request("url")
varIntro=Request("intro")
strSql="insert into biao1(name,url, intro) values('" & varName & "','" & varurl & "','" & varIntro & "')"
conn.execute strSql
conn.close
set conn=nothing
Response.Redirect "6-1.asp" '添加完毕，返回首页6-1.asp
Else
Response.Write "请将所有信息填写完整"
End If
%>
</body>
</html> 展开
1个回答
展开全部
原因：
有几个主要的错误原因：
这个错误发生在当你的程序试图执行更新数据库或其它类似操作时。这是因为
ADO由于以下的几个原因而不能够写数据库造成的。
1。最普遍的原因是匿名用户帐号(IUSR_MACHINE)对该数据库文件没有写权限。
要解决这个问题，在管理器中调整数据库文件的属性，让匿名用户有正确的权限。
当使用ACCESS数据库时，不仅要给文件写的权限，还要给该目录写 的权限，因为
Jet需要在该目录建立一个.ldb文件。
2。第二个原因是数据库没有使用正确的模式打开。应该使用下面的方法打开。
SQL = "UPDATE Products Set UnitPrice = 2;"
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Mode = 3 ''3 = adModeReadWrite
Conn.Open "myDSN"
Conn.Execute(SQL)
Conn.Close
注意默认的Mode是设置0(adModeUnknown),它是允许更新的。
3。还有可能是在ODBC管理器中将该DSN的只读选项选中。
4。你是在同时更新两个表中的字段，也会出现这个错误信息，解决办法是分开来更新
这两个表中各自字段。
5。当你使用了一个从低版本中（如ACCESS2.0,ACCESS7.0）载入到高版本(ACCESS 2000)
中的查询时，在执行这个查询是会出现该错误。
有几个主要的错误原因：
这个错误发生在当你的程序试图执行更新数据库或其它类似操作时。这是因为
ADO由于以下的几个原因而不能够写数据库造成的。
1。最普遍的原因是匿名用户帐号(IUSR_MACHINE)对该数据库文件没有写权限。
要解决这个问题，在管理器中调整数据库文件的属性，让匿名用户有正确的权限。
当使用ACCESS数据库时，不仅要给文件写的权限，还要给该目录写 的权限，因为
Jet需要在该目录建立一个.ldb文件。
2。第二个原因是数据库没有使用正确的模式打开。应该使用下面的方法打开。
SQL = "UPDATE Products Set UnitPrice = 2;"
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Mode = 3 ''3 = adModeReadWrite
Conn.Open "myDSN"
Conn.Execute(SQL)
Conn.Close
注意默认的Mode是设置0(adModeUnknown),它是允许更新的。
3。还有可能是在ODBC管理器中将该DSN的只读选项选中。
4。你是在同时更新两个表中的字段，也会出现这个错误信息，解决办法是分开来更新
这两个表中各自字段。
5。当你使用了一个从低版本中（如ACCESS2.0,ACCESS7.0）载入到高版本(ACCESS 2000)
中的查询时，在执行这个查询是会出现该错误。
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
