mod_admin.asp

学生档案管理系统是典型的信息管理系统(MIS),其开发主要包括后台数据库的建立和维护以及前端程序的开发两个方面。对于前者要求建立起数据一致性和完整性强、数据安全性好的库。而对于后者则要求应用程序功能完

<!-- #include file = "conn.asp" -->
<!-- #include file = "chkuser.asp" -->
<%
dim strSQL, cmdObj, rsObj
dim admin_name
admin_name  =  Request.Form("admin_name")

       Set cmdObj  =  Server.CreateObject("ADODB.Command")
       Set rsObj  =  Server.CreateObject("ADODB.RecordSet")
       cmdObj.CommandText  =  "SELECT * FROM admin WHERE admin_name = '" & admin_name & "'"
       cmdObj.CommandType  =  1
       Set cmdObj.ActiveConnection  =  conn
       rsObj.Open cmdObj, , 2,3
       rsObj("admin_pwd")  =  Request.Form("pwd")	   
       rsObj.Update
       rsObj.Close
       set rsObj = nothing

     '  CloseConn()
%>
<script language = Javascript>
<!--
alert("修改成功！");
window.location = "info_manager.asp"
-->
</script>