asp插入数据库问题

[复制链接]

逍遥◆爱你

电梯直达

1^#

发表于 2010-1-17 06:19:01 | 只看该作者回帖奖励

|倒序浏览 |阅读模式

各位帅哥美女，求助，急！！！！！！！！！！
代码如下：
<%
bookname=Request.Form("name")
%>
<%
Dim conn,rst,strsql,dbpath
Set conn=Server.CreateObject("ADODB.Connection")
dbpath=Server.MapPath("test.mdb")
conn.Open "Driver={Microsoft Access Driver (*.mdb)};DBQ="&dbpath
if conn.State=1 then
Set rst=Server.CreateObject("ADODB.Recordset")
strsql="insert into book(name) values('"&bookname&"')"
conn.execute strsql
conn.close
set conn=nothing
Response.Write("插入成功")
%>
<%
end if
%>
显示错误如下
错误类型：
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC Microsoft Access Driver] 操作必须使用一个可更新的查询。
/diwuzhang/insert.asp, 第 21 行

浏览器类型：
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1)
网页：
GET /diwuzhang/insert.asp

收藏0

使用道具举报

晒月亮的蜻蜓

2^#

发表于 2010-1-17 06:19:05 | 只看该作者

<%
bookname=Request.Form("name")
%>
<%
Dim conn,rst,strsql,dbpath
Set conn=Server.CreateObject("ADODB.Connection")
dbpath=Server.MapPath("test.mdb")
conn.Open "Driver={Microsoft Access Driver (*.mdb)};DBQ="&dbpath
if conn.State=1 then
Set rst=Server.CreateObject("ADODB.Recordset")
strsql="insert into book(name) values('"&bookname&"')"
Response.Write "<br>"&strsql&"<br>"
conn.execute strsql
conn.close
set conn=nothing
Response.Write("插入成功")
%>
<%
end if
%>

请先这样运行一下看看显示什么.
我这样改的目的,和看到的结果是什么我想你就应该明白是什么回事了

回复支持反对

使用道具举报

藤蘿下的陽光

3^#

发表于 2010-1-17 06:19:09 | 只看该作者

我按照你改的运行了，可还是显示“操作必须使用一个可更新的查询”；我这个学期才刚开始学asp，还有我用的是dreamweaver8.0来编写，可看到结果后我还是不明白是怎样回事，望指点？

回复支持反对

使用道具举报

精彩的瞬鐧

4^#

发表于 2010-1-17 06:19:13 | 只看该作者

你输出一下strsql看看查询语句是什么，然后拷贝到查询器中试试，看能不能执行

回复支持反对

使用道具举报

返回列表

		自动登录	找回密码
密码			注册