用rs("name")之前，必须已经获得rs("name")的值，否则就成为了整个集合。其他应该也是，但你userid已经request.querystring("userid")从而已经从之前的页面或的了具体值，所以，userid已经是获得的具体的值了，而其他的比如rs（"name"）却并没有获得一个具体值，而是个记录集合。

错误信息为；多步 OLE DB 操作产生错误。如果可能，请检查每个 OLE DB 状态值。没有工作被完成。
<%@ LANGUAGE = VBScript.Encode %>
<!--#include file="articleconn.asp"-->
<!--#include file="../MD5/md5.asp" -->
<!--#include file="../../check.asp"-->
<%if session("flag")>1 then
response.write "<script>alert('您的操作权限不够！');history.back();</script>"
response.end
end if
%>

<%
dim rs
dim sql
set rs=server.createobject("adodb.recordset")
sql="select * from User where UserID="&Cint(request("userid"))
rs.open sql,conn,1,3

if request("change")<>"" then
rs("UserID")=request("userid") --------报错的是这句
if Replace(request("password"), "'", "''")<>"" then
rs("Password")=md5(Replace(request("password"), "'", "''"))
end if
rs("Username")=request("myname")
rs("email")=request("email")
rs("oklook")=request("oklook")
rs("nos")=request("nos")
rs("send")=request("send")
rs("money")=request("money")
rs("Answer")=request("Answer")
rs("starlook")=request("starlook")
rs("nlook")=request("nlook")
rs("sex")=request("sex")
'rs("province")=request("province")
rs("Question")=request("Question")
rs("phone")=request("phone")
rs("pay")=request("pay")
rs("baoyue")=request("baoyue")
rs("getmoney")=request("getmoney")
rs("usercount")=request("usercount")
rs.update
else
rs("getmoney")="0"
rs.update
end if

rs.close
set rs=nothing
conn.close
set conn=nothing
response.redirect Request.ServerVariables("HTTP_REFERER")
%>
</body>
</html>