📄 student_modify3.asp

📁 系里的网站设计
💻 ASP
字号:
<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>学生资料修改</title>
<STYLE type=text/css>
TD,p,b,font,pre,BODY {
	FONT-FAMILY: "Verdana", "Arial", "Helvetica", "sans-serif", "宋体"; FONT-SIZE: 12px
}

FORM {
	FONT-FAMILY: "Verdana", "Arial", "Helvetica", "sans-serif", "宋体"; FONT-SIZE: 12px; MARGIN-BOTTOM: 0px; MARGIN-TOP: 0px
}

A {
	FONT-FAMILY: "Verdana", "Arial", "Helvetica", "sans-serif", "宋体"; FONT-SIZE: 12px; TEXT-DECORATION: none
}

H4 {
	FONT-FAMILY: "Verdana", "Arial", "Helvetica", "sans-serif", "宋体"; FONT-SIZE: 14px
}
HR {
	COLOR: #000000; HEIGHT: 1px
}


</STYLE>

</head>

<body>
<% 
function change(s)
	change = replace(replace(s, "'","''"),"""","""""")
end function
%>
 
<%
dim name,password,password2,adr,youbian,tel,sex,email,oicq,grade,class1,xuewei,class2,xuehao,note,rs

name=change(request.form("name"))
password=change(request.form("password"))
password2=change(request.form("password2"))
adr=change(request.form("adr"))
youbian=change(request.form("youbian"))
tel=change(request.form("tel"))
sex=change(request.form("sex"))
email=change(request.form("email"))
oicq=change(request.form("oicq"))
grade=change(request.form("grade"))
class1=change(request.form("class1"))
xuewei=change(request.form("xuewei"))
class2=change(request.form("class2"))
xuehao=change(request.form("xuehao"))
note=change(request.form("note"))

set conn = server.createobject("adodb.connection")
conn.open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath("./user.mdb")
Set rs = server.createobject("ADODB.Recordset")
rs.open "select * from student where 学号='" & xuehao & "'" , conn, 1,3

rs("姓名")= name
rs("密码")= password
rs("确认密码")= password2
rs("联系地址")= adr
rs("邮编")= youbian
rs("电话")= tel
rs("性别")= sex
rs("email")= email
rs("OICQ")= oicq
rs("入学年度")= grade
rs("专业")= class1
rs("学位")= xuewei
rs("班级")= class2
rs("学号")= xuehao
rs("备注")= note
rs.Update
rs.close

response.write "资料修改成功"
 %> 
 

<a href="xsfc_3.asp">返回同学录首页</a> 
</body>

</html>
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -