changezl.asp

来自「基于asp的 班级同学录主页源代码」· ASP 代码 · 共 27 行

<% @language="vbscript" %>
<%
'程序名称:cctony mynews v1.0（cctony首页更新 v1.0）
'程序作者:李方进（cctony）
'主页：http://okcool.mycool.net（新生代网络创意）
'OICQ：344827    E-mail：[e-mail]
'本程序是免费程序，您可以任意自由复制，传播。但请您尊重作者劳动，不要修改程序内的版权信息。
%>
<%
response.buffer=true
Response.Expires=0
%>
<!-- #include file="connect.asp" -->
<%
adminame=request("username")
adminpwd=request("password")
sql="select * from admin "
rs.open sql,conn,3,2
rs("name")=adminame
rs("password")=adminpwd
rs.update
rs.close
%>
<script language=vbscript>
MsgBox "您成功修改了您的管理员帐号和密码，请牢记！"
location.href = "add.asp"
</script>