?? update_student.asp
字號(hào):
<!-- #include file="conn.asp" -->
<%
ID=request.QueryString("ID")
set rs=server.CreateObject("adodb.recordset")
sqlstr="select * from student where 學(xué)生ID='"&ID&"'"
set Rs=conn.execute(sqlstr)
%>
<html>
<head>
<title>修改學(xué)生信息網(wǎng)頁(yè)</title>
</head>
<body>
<p><font face="幼圓" size="3">修改學(xué)生信息</font></p>
<form method="POST" action="update_student1.asp">
<input type=hidden name="ID" value=<%=ID%>>
姓名: <input type="text" name="Name" size="20" value="<%=rs("姓名")%>">
<p>性別: <select size="1" name="Sex">
<option <%if rs("性別")="男" then response.write "select" end if%> value="男">男</option>
<option <%if rs("性別")="女" then response.write "select" end if%> value="女">女</option>
</select></p><p>日期: <input type="text" name="Birthday" size="20" value="<%=rs("出生日期")%>">日期格式: 1980-3-9</p>
<p>電話:
<input type="text" name="Tel" size="20" value="<%=rs("電話")%>">
</p>
<p>地址: <input type="text" name="Address" size="20" value="<%=rs("地址")%>"></p>
<p>班級(jí): <select name="GName">
<%
str1="select * from grade"
set rs_stu=conn.execute(str1)
do while not rs_stu.eof
if rs_stu("班級(jí)")=rs("班級(jí)") then
%>
<option selected><%=rs("班級(jí)")%></option>
<%
else
%>
<option><%=rs_stu("班級(jí)")%></option>
<%
end if
rs_stu.movenext
loop
rs_stu.close
Set rs_stu=Nothing
%>
</select>
</p>
<p>系別: <select name="bbb">
<%
str1="select * from department"
set rs_stu=conn.execute(str1)
do while not rs_stu.eof
if rs_stu("系別")=rs("系別") then
%>
<option selected><%=rs("系別")%></option>
<%
else
%>
<option><%=rs_stu("系別")%></option>
<%
end if
rs_stu.movenext
loop
rs_stu.close
Set rs_stu=Nothing
%>
</select>
</p>
<br>
<p><input type="submit" value="保存修改" name="B1">
<input type="reset" value="全部重寫(xiě)" name="B2">
<input onClick="document.location.href='xs_student.asp';" type="button" value="返回" name="B3"></a></p>
</form>
<% rs.close
set rs=nothing %>
</body>
</html>
?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -