菜鸟问:一个数据库问题,解决了立刻高分节贴
我的数据库路径是:"db/scershou.asp"
里面有一个表"mytable"
ID name islend
1 王 是/否 应该用方格的,(可惜我画不出来)
2 张 是/否
下面是有问题的代码.
<%
dim startime,conn
startime=timer()
db="db/scershou.asp"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")
conn.Open connstr
id="1"
dim sql
dim rs
dim islend
islend=true
set rs=server.createobject("adodb.recordset")
sql="update mytable set islend="&islend&" where id="+id
rs.Open sql,connstr,1,1
rs.open "select * from mytable where id="+id,conn,1,3
password=rs(1)
%>
<%Response.Write(password)
%>
提示是
Microsoft JET Database Engine 错误 '80004005'
操作必须使用一个可更新的查询。
/LEND2.ASP,行 18
其实有问题的就是
sql="update mytable set islend="&islend&" where id="+id
rs.Open sql,connstr,1,1
把它删掉就可以正常显示了.
看来我更新的语法写错了,谁能帮帮我该怎么改呢?高分节贴!