Código:
<% If request("valpwd")="T" then set rsSqlPwd=server.CreateObject("adodb.recordset") sqlPwd="select * from users where codid="&request.Cookies("UserInfo")("codid")&" and pwd='"&request("pwd1")&"'" set rsSqlPwd=objConn.execute(sqlPwd) if rsSqlPwd.eof then response.Write("<script language='javascript'>alert('El password anterior no concuerda, por favor ingreselo nuevamente.');</script>") else set rsUpdPwd=server.CreateObject("adodb.recordset") sqlUpdPwd="update users set pwd='"&request("pwd2")&"' where codid="&request.Cookies("UserInfo")("codid") set RsUpdPwd=objConn.execute(sqlUpdPwd) rsSqlPwd.close set rsSqlPwd=nothing response.Write("<script language='javascript'>alert('El password ha sido cambiado exitosamente');location.href='Cpanel.asp';</script>") end if end if %>