2.8w+
社区成员
- 主页
大家帮我看看，我这段修改数据库的代码怎么修改不成功的啊，谢谢了哦
<%
sub ddcl()
id=request("id")
zt="已经处理"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,1
sql="update buyer set zt='"&zt&"' where ddbh="&id
conn.execute(sql)
end sub
%>
sub ddcl()
id=request("id")
zt="已经处理"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,1
sql="update buyer set zt='"&zt&"' where ddbh="&id
conn.execute(sql)
end sub
%>
...全文
请发表友善的回复…
发表回复
dolphin77 2006-04-03
<%
on error resume next
Conn.execute("Update Buyer Set Zt='已经处理' where Ddbh='"&Request("id")&"'")
if err then
Response.Write ("Update Buyer Set Zt='已经处理' where Ddbh='"&Request("id")&"'")&"<p>"
Response.Write Err.Number & Err.Description
response.End
End if
%>
最后用的这个解决的问题
on error resume next
Conn.execute("Update Buyer Set Zt='已经处理' where Ddbh='"&Request("id")&"'")
if err then
Response.Write ("Update Buyer Set Zt='已经处理' where Ddbh='"&Request("id")&"'")&"<p>"
Response.Write Err.Number & Err.Description
response.End
End if
%>
最后用的这个解决的问题
dolphin77 2006-04-03
<%
Sub Ddcl()
Id=request("id")
Zt="已经处理"
Conn.execute("Update Buyer Set Zt='"&zt&"' where Ddbh="&id)
End Sub
%>
Sub Ddcl()
Id=request("id")
Zt="已经处理"
Conn.execute("Update Buyer Set Zt='"&zt&"' where Ddbh="&id)
End Sub
%>
ahhisoft 2006-04-03
<%
sub ddcl(id)
zt="已经处理"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,3
sql="select zt from buyer where ddbh="&id
rs("zt")=zt
end sub
%>
sub ddcl(id)
zt="已经处理"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,3
sql="select zt from buyer where ddbh="&id
rs("zt")=zt
end sub
%>
wudi626 2006-04-03
试试看
<%
sub ddcl(id)
id=request("id")
zt="已经处理"
sql="update buyer set zt='"&zt&"' where ddbh="&id&""
conn.execute(sql)
end sub
%>
在提交的时候应该要 调用 ddcl()的函数
dolphin77 2006-04-03
大哥，我试了你说的，还是不能修改的啊，是不是什么地方不正确啊，你能加我的qq110742314吗？
dolphin77 2006-04-03
好的，谢谢你了啊，你有qq吗，能加我吗？
clbaddd 2006-04-03
另外你应该在sub中加入一个参数
sub ddcl(id)
id = Request("ID")
...
end sub
sub ddcl(id)
id = Request("ID")
...
end sub
clbaddd 2006-04-03
这样写
<%
sub ddcl()
id=request("id")
zt="已经处理"
sql="update buyer set zt='"&zt&"' where ddbh="&id
conn.execute(sql)
end sub
%>
把rs去掉
<%
sub ddcl()
id=request("id")
zt="已经处理"
sql="update buyer set zt='"&zt&"' where ddbh="&id
conn.execute(sql)
end sub
%>
把rs去掉
dolphin77 2006-04-03
最好是有高人能给我解释下这当中出错的原因，在线等待的，谢谢了哦