asp高手请进,没有写入数据库?急呀呀

来源:百度知道 编辑:UC知道 时间:2024/09/20 14:55:49
<%
if request("ttype")="1" then
ttype="1"
sql="select ac,question,lock,ltime,ip,email,vip,rz from in_user where id="&clng(request("id"))
else
ttype="2"
sql="select ac,question,lock,ltime,ip,email,vip,rz from en_user where id="&clng(request("id"))
end if
%>
<%
ac=request("ac")
question=request("question")
lock=request("lock")
ltime= Request("ltime")
ip=Request("ip")
email=request("email")
vip=request("vip")
rz=request("rz")
%>
<%
set rs1=server.createobject("adodb.recordset")
sql="select * from in_user"
rs1.open sql,conn,1,3

rs1("ac")=ac
rs1("question")=question
rs1("lock")=lock
rs1("ltime")=ltime
rs1("ip")

你想表达什么???
ttype="1" 的时候更新rs1,ttype="2" 的时候更新rs2,对吗??

按照你那样写的话if 到end if 一段都是废的.

如果是我理解正确的话那你应该按照下面的方式提交:

<%
if request("ttype")="1" then
ttype="1"
sql="select ac,question,lock,ltime,ip,email,vip,rz from in_user where id="&clng(request("id"))
else
ttype="2"
sql="select ac,question,lock,ltime,ip,email,vip,rz from en_user where id="&clng(request("id"))
end if

ac=request("ac")
question=request("question")
lock=request("lock")
ltime= Request("ltime")
ip=Request("ip")
email=request("email")
vip=request("vip")
rz=request("rz")

set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,3
rs("ac")=ac
rs("question")=que