www.gusucode.com > 云枫企业网站源代码第二版 2.0源码程序 > admin/Manage_Inc/managereditok.asp

    <%@ language="VBScript"%>
<%response.Expires = 0%>

<!--#include file="../inc/conn.asp"-->
<%
set rs=server.createobject("adodb.recordset")
sqltext="select * from Manage_User where Id=" & request.querystring("uid")
rs.open sqltext,conn,3,3

'更新管理员密码到数据库
rs("UserName")=request.form("uid")
rs("PassWord")=encrypt(request.form("pwd1"))
rs.update
rs.close
conn.close
response.redirect "manage.asp"
%>