教育系统应用

开发平台：

HTML/CSS

updatauser.asp：源码内容

							<!--#include file="conn.asp"-->
<%
dim user,password,score,kaohao
kaohao=session("id")
if kaohao<>"" then
password=request.Form("psw")
user=request.Form("user")
score=request.Form("score")
set rs=server.createobject("adodb.recordset")
cmd="select * from userlogin where kaohao='"&kaohao&"'"
rs.open cmd,conn,1,3
rs("user")=user
rs("passwd")=password
rs("score")=score
'rs("kaohao")=kaohao
rs.update
response.Write("<script>alert('考生信息修改成功!');window.location.href('Manageuser.asp')</script>")
else
response.Write("<script>alert('未选择考生!');window.location.href('Manageuser.asp')</script>")
end if
%>

						