UC知道asp中的sql的update问题(急!!!谢谢了!!)
来源：百度知道 编辑：UC知道 时间：2024/09/25 19:02:52
pk = request("pk") ''主键
''********修改时先添好被修改信息.***************
set rs=Server.CreateObject("Adodb.Recordset")
sql="select * from VIEW3 where ID="& pk
rs.open sql,conn,1,1
if rs.eof then
salert "数据库出错!!"
response.end
else
title = rs("title")
content = rs("content")
receiver = rs("receiver")
sender = rs("sender")
Expr1 = rs("Expr1")
tdate = rs("tdate")
end if
rs.close
set rs = nothing
conn.execute("update admininforms set lookname=lookname+'"&rs("receiver")&"' where icaption='"&rs("title")&"' and icontent='"&rs("content")&"' and iman='"&rs("sender")&"'")
conn.execute("delete from remind where id=" & pk)
%
''********修改时先添好被修改信息.***************
set rs=Server.CreateObject("Adodb.Recordset")
sql="select * from VIEW3 where ID="& pk
rs.open sql,conn,1,1
if rs.eof then
salert "数据库出错!!"
response.end
else
title = rs("title")
content = rs("content")
receiver = rs("receiver")
sender = rs("sender")
Expr1 = rs("Expr1")
tdate = rs("tdate")
end if
rs.close
set rs = nothing
conn.execute("update admininforms set lookname=lookname+'"&rs("receiver")&"' where icaption='"&rs("title")&"' and icontent='"&rs("content")&"' and iman='"&rs("sender")&"'")
conn.execute("delete from remind where id=" & pk)
%
当然错了.
rs.close set rs = nothing 已经把rs关闭了
下面的SQL语句还用到了rs("receiver")
你可以再关闭之前拼接
...
end if
sqlx = "update admininforms set lookname=lookname+'"&rs("receiver")&"' where icaption='"&rs("title")&"' and icontent='"&rs("content")&"' and iman='"&rs("sender")&"'"
rs.close
set rs = nothing
conn.execute(sqlx)
...
在end if
前加个rs.update
如果还不行的话
就在
title = rs("title") 前面加个rs.addnew
然后再在endif前加个rs.update
怎么个不好用法啊
错误： 已经 rs.close 还使用记录集对象
==============
试试下面
====================
<%
pk = request("pk") ''主键
''********修改时先添好被修改信息.***************
set rs=Server.CreateObject("Adodb.Recordset")
sql="select * from VIEW3 where ID="& pk
rs.open