<%
dim var_id
var_id=session("id")
if request.form("name")<>"" and request.form("url")<>"" and request.form("text")<>"" then
dim db
set db=server.CreateObject("ADODB.Connection")
    db.open "web"      //利用数据源连接数据库     
dim varname,varurl,vartext
varname=request.form("name")
varurl=request.form("url")
vartext=request.form("text")
db.execute "update web set name='"&varname&"', url='"&varyrl&"',text='"&vartext&"' where id="&var_id
response.Redirect "index.asp"
else
response.write "请将所有信息填写完整"
response.write "<a href='index.asp' >重新更新</a>"
end if
%>
 
var_id的值可以获得
在网上找了很多相关的问题，还是找不到

[ 本帖最后由 qq757500610 于 2010-6-3 15:30 编辑 ]

把 , 改成and

Sql="update web set name='"&varname&"', url='"&varyrl&"',text='"&vartext&"' where id="&var_id
Respons.Write Sql
输出一下SQL语句看一下显示什么。

update web set name='腾讯', url='',text='腾讯QQ' where id=9

还是不行啊

办法一:
Sql="update [web] set name='"&varname&"', url='"&varurl&"',text='"&vartext&"' where id="&var_id
表名加中括号
办法二:
Dim rsWeb
Set rsWeb=Server.CreateObject("ADODB.RecordSet")
rsWeb.Open "select * from [web] where id="&var_id,db,1,3
rsWeb("name")=varname
rsWeb("url")=varurl
rsWeb("text")=vartext
rsWeb.update
rsWeb.Close
Set rsWeb=Nothing
用RecordSet来更新数据库