UC知道asp网页修改数据库问题。。。急
来源：百度知道 编辑：UC知道 时间：2024/06/01 04:46:32
下面这段代码哪里错了？
<%
Dim conn
Set conn=server.CreateObject("adodb.connection")
conn.connectionstring="provider=microsoft.jet.oledb.4.0;data source="&server.mappath("travel.mdb")
conn.open
Dim rs
Set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,3,1
Dim name,address,tm,spend,id
id=request.form("id")
name=request.form("name")
address=request.form("address")
tm=request.form("tm")
spend=request.form("spend")
sql="update theme set name=" & name&"address=" & address & ",time=" & tm &",'pend=" & spend &" where id=" & id
conn.execute(sql)
%>
<%
Dim conn
Set conn=server.CreateObject("adodb.connection")
conn.connectionstring="provider=microsoft.jet.oledb.4.0;data source="&server.mappath("travel.mdb")
conn.open
Dim rs
Set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,3,1
Dim name,address,tm,spend,id
id=request.form("id")
name=request.form("name")
address=request.form("address")
tm=request.form("tm")
spend=request.form("spend")
sql="update theme set name=" & name&"address=" & address & ",time=" & tm &",'pend=" & spend &" where id=" & id
conn.execute(sql)
%>
Set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,3,1
用来干什么？你要用到记录集吗？前面的sql变量是空值，这样会出错的.
sql="update theme set name='" & name& "' ,address='" & address & "',time='" & tm &"',pend='" & spend &"' where id=" & id
这句改成这样。
建议把报错也发出来，这样大家容易了解，发一段代码很难看错误
我调试了 郁闷啊··· 没有找到··
把sql这样写，试试~~
sql="update theme set name='" & name&"',address='" & address & "',time='" & tm &"',pend='" & spend &"' where id='" & id &"' "