infomodifysave.asp

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

<!-- #include file = "conn.asp" -->
<!-- #include file = "chkuser.asp" -->
<%
dim strSQL, cmdObj, rsObj
id=request.Form("id")
       Set rsObj  =  Server.CreateObject("ADODB.RecordSet")
       sql  =  "SELECT top 1 * FROM st_info where id="&id&""
       rsObj.open sql,conn,1,3
       rsObj("user_number")  = Request.Form("user_number")
	   rsObj("user_name")  = Request.Form("user_name")
       rsObj("user_testnumber")  = Request.Form("user_testnumber")
       rsObj("user_idnumber")  = Request.Form("user_idnumber")
       rsObj("user_sex")  = Request.Form("user_sex")
	   rsObj("user_year")  = Request.Form("select")
rsObj("user_month")  = Request.Form("select3")
rsObj("user_date")  = Request.Form("select2")
	   rsObj("user_city")  = Request.Form("user_city")
       rsObj("user_area")  = Request.Form("user_area")
       rsObj("user_address")  = Request.Form("user_address")
       rsObj("user_postcode")  = Request.Form("user_postcode")
       rsObj("user_homephone")  = Request.Form("user_homephone")
       rsObj("user_bedroomphone")  = Request.Form("user_bedroomphone")
       rsObj("user_mobilephone")  = Request.Form("user_mobilephone")
       rsObj("user_major")  = Request.Form("user_major")
       rsObj("user_class")  = Request.Form("user_class")
	   rsObj("user_collogetestach")  = Request.Form("user_collogetestach")  
	   rsObj("user_rp")  = Request.Form("user_rp")
	   rsObj("user_info")  = Request.Form("user_info")
       rsObj.Update
       rsObj.Close
       set rsObj = nothing
	   set cmdObj = nothing
'       CloseConn()
%>
<script language = Javascript>
<!--
alert("修改成功！");
window.location = "info_manager.asp"
-->
</script>