📄 changepersoninfo.asp
字号:
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
<style type="text/css">
<!--
body,td,th {
font-size: 14px;
color: #003399;
}
-->
</style>
</head>
<body>
<%
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("../db/info.mdb")
turnnew=Request("turnnew")
If turnnew="" then
sql="select * from studentdetail where snick='" & session("student") & "'"
Set rs=Server.CreateObject("ADODB.Recordset")
rs.Open sql,conn,1,1
%>
<form method="post" action="">
<table width="40%" border="0" align="center">
<tr>
<td width="32%">姓名：</td>
<td width="68%"><input type="text" name="sname" size="20" value=<%=rs("sname")%>></td>
</tr>
<tr>
<td>性别：</td>
<td><input type="text" name="sex" size="20" value=<%=rs("sex")%>></td>
</tr>
<tr>
<td>年龄：</td>
<td><input type="text" name="age" size="20" value=<%=rs("age")%>></td>
</tr>
<tr>
<td>学习程度：</td>
<td><input type="text" name="grade" size="20" value=<%=rs("grade")%>></td>
</tr>
<tr>
<td>邮箱：</td>
<td><input type="text" name="email" size="20" value=<%=rs("email")%>></td>
</tr>
<tr>
<td>电话：</td>
<td><input type="text" name="tele" size="20" value=<%=rs("tele")%>></td>
</tr>
<tr>
<td>住址：</td>
<td><input type="text" name="address" size="20" value=<%=rs("address")%>></td>
</tr>
<tr>
<td>辅导科目一：</td>
<td><input type="text" name="tutorship1" size="20" value=<%=rs("tutorship1")%>></td>
</tr>
<tr>
<td>辅导科目二：</td>
<td><input type="text" name="tutorship2" size="20" value=<%=rs("tutorship2")%>></td>
</tr>
<tr>
<td>寻找家教情况：</td>
<td><input type="text" name="searchstate" size="20" value=<%=rs("state")%>></td>
</tr>
<tr>
<td>备注：</td>
<td><textarea rows="3" cols="20" name="demo"><%=rs("demo")%></textarea></td>
</tr>
<tr>
<td><input type="submit" value="修改" name="turnnew"></td>
<td><input type="reset" value="重置"></td>
</tr>
</table>
</form>
<%
End If
if turnnew<>"" then
sname=Request.form("sname")
sex=Request.form("sex")
age=Request.form("age")
grade=Request.form("grade")
email=Request.form("email")
tele=Request.form("tele")
address=Request.form("address")
tutorship1=Request.form("tutorship1")
tutorship2=Request.form("tutorship2")
searchstate=Request.form("state")
demo=Request.form("demo")
sql="update studentdetail set sname='" & sname & "',sex='" &_
sex & "',age=" & age & ",grade='" & grade &_
"' ,email='" & email & "',tele='" & tele &_
"' ,address='" & address & "',tutorship1='" & tutorship1 &_
"',tutorship2='" & tutorship2 &_
" ',state='" & searchstate & " ',demo='" & demo &_
" ' where snick='" & session("student") &"'"
conn.Execute(sql)
Response.Write("修改成功")
End If
%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -