📄 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 teacherdetail where nick='" & session("teacher") & "'"
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="name" size="20" value=<%=rs("name")%>></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="idcard" size="20" value=<%=rs("idcard")%>></td>
</tr>
<tr>
<td>学历：</td>
<td><input type="text" name="diploma" size="20" value=<%=rs("diploma")%>></td>
</tr>
<tr>
<td>职业：</td>
<td><input type="text" name="work" size="20" value=<%=rs("work")%>></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="subject1" size="20" value=<%=rs("subject1")%>></td>
</tr>
<tr>
<td>讲授科目二：</td>
<td><input type="text" name="subject2" size="20" value=<%=rs("subject2")%>></td>
</tr>
<tr>
<td>聘用情况：</td>
<td><input type="text" name="state" 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="重置" name="rt"></td>
</tr>
</table>
</form>
<%
End If
if turnnew<>"" then
name=Request.form("name")
sex=Request.form("sex")
age=Request.form("age")
idcard=Request.form("idcard")
diploma=Request.form("diploma")
work=Request.form("work")
email=Request.form("email")
tele=Request.form("tele")
address=Request.form("address")
subject1=Request.form("subject1")
subject2=Request.form("subject2")
searchstate=Request.form("state")
demo=Request.form("demo")
sql="update teacherdetail set name='" & name & "',sex='" &_
sex & "',age=" & age & ",diploma='" & diploma & "',idcard='" & idcard & "',work='" & work &_
"' ,email='" & email & "',tele='" & tele &_
"' ,address='" & address & "',subject1='" & subject1 &_
"',subject2='" & subject2 &_
" ',state='" & searchstate & " ',demo='" & demo &_
" ' where nick='" & session("teacher") &"'"
conn.Execute(sql)
Response.Write("修改成功")
End If
%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -