我写了下面个代码:
Set Rs1=Server.CreateObject("Adodb.Recordset")
SQL1="Select * From [user] WHERE Uname='Uname'"
Rs1.open sql1,conn,1,3
if not rs.eof then
rs1("isonline")="1"
end if
Response.Write("<script>alert('HOHO，登陆成功！！！\n\n【聊天室管理员】欢迎您进入聊天系统!');window.location='ltsindex.asp';</script>")
response.End()

Rs.Close
Set Rs=Nothing
Conn.Close
Set Conn=Nothing
来实现用户登入后更新用户的在线状态  isonline = 1 表示在线  0 表示不在线 ,
我输入的代码运行结果像附件.
哪个帮帮我改改....
还有个就是 当用户修改自己的资料时候密码可不修改怎么弄,但要密码修改那个输入框  这个是我们老师出的个题目
请各为大哥大姐们帮帮我吧...

SQL1="Select * From [user] WHERE Uname='"&Uname&"'"
改成这样应该可以了
你试试

<%
Uname=Request("Uname")
Set Rs1=Server.CreateObject("Adodb.Recordset")
Rs1.open "Select * From [user] WHERE Uname='"&Uname&"'",conn,1,3 
if not Rs1.eof then
rs1("isonline")="1"
Response.Write("<script>alert('HOHO，登陆成功！！！\n\n【聊天室管理员】欢迎您进入聊天系统!');window.location='ltsindex.asp';</script>")
response.End()
Rs1.update
end if 
Rs1.Close
Set Rs1=Nothing
%>

现在能进去了,没有报错了,但是数据库里的ISONLINE 数据没有更新呀 还是0
还有什么问题么//

把rs1("isonline")="1"改成rs1("isonline")=1