?? updata.asp
字號:
<%if session("password")<>"" then%>
<!--#include file="conn1.asp"-->
<!-- #include file="top.asp" -->
<!-- #include file="adminmenu.asp" -->
<table width="752" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td> </td>
</tr>
</table>
<%if request("kind")="admin" then%>
<%
id=trim(Request("id"))
sqlcmd = ("select * from admin where id="&id) '查詢id(ID號)這條記錄
rs.Open sqlcmd,newconn,1,1
session("user")=rs("username")
%>
<table width="752" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><form method="POST" action="modify.asp">
<table width="300" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td height="25" align="center"> </td>
<td height="25"> </td>
<td height="25"> </td>
</tr>
<tr>
<td width="57" height="25" align="center">用戶名</td>
<td width="16" height="25"> </td>
<td width="225" height="25">
<input name="username" size="25" maxlength="30" class="editbox1" value="<%=rs("username")%>">
</td>
</tr>
<tr>
<td height="25" align="center">密碼</td>
<td width="16" height="25"> </td>
<td width="225" height="25">
<input name="password" type="password" size="25" maxlength="30" class="editbox1" value="<%=rs("password")%>"></td>
</tr>
<tr>
<td height="25" colspan="3">
<div align="center">
<input class=bottom name=B12 type=submit value="修改記錄">
<input class=bottom name=B22 type=reset value="重新填寫">
<input type="hidden" name="kind" value="0">
<input type="hidden" name="id" value="<%=rs("id")%>">
</div></td>
</tr>
</table>
</form>
</td>
</tr>
</table>
<%end if%>
<%if request("kind")="user" then%>
<%
id=trim(Request("id"))
sqlcmd = ("select * from user where id="&id) '查詢id(ID號)這條記錄
rs.Open sqlcmd,newconn,1,1
session("xh")=rs("xh")
session("return")="admin_user.asp"
%>
<table width="752" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><form method="POST" action="modify.asp">
<table width="300" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td width="57" height="25" align="center">班級</td>
<td width="16" height="25"> </td>
<td width="225" height="25">
<input name="bj" size="25" maxlength="30" class="editbox1" value="<%=rs("bj")%>">
</td>
</tr>
<tr>
<td height="25" align="center">學號</td>
<td width="16" height="25"> </td>
<td width="225" height="25">
<input name="xh" size="25" maxlength="30" class="editbox1" value="<%=rs("xh")%>"></td>
</tr>
<tr>
<td width="57" height="25" align="center">姓名</td>
<td width="16" height="25"> </td>
<td width="225" height="25">
<input name="xm" size="25" maxlength="40" class="editbox1" value="<%=rs("xm")%>">
</td>
</tr>
<tr>
<td width="57" height="25" align="center">密碼</td>
<td width="16" height="25"> </td>
<td width="225" height="25">
<input type="text" name="mm" size="25" class="editbox1" value="<%=rs("mm")%>">
</td>
</tr>
<tr>
<td width="57" height="25" align="center">性別</td>
<td width="16" height="25"> </td>
<td width="225" height="25">
<input name="sex" size="25" maxlength="100" class="editbox1" value="<%=rs("sex")%>">
</td>
</tr>
<tr>
<td width="57" height="25" align="center">住址</td>
<td width="16" height="25"> </td>
<td width="225" height="25"><input name="addr" size="25" maxlength="100" class="editbox1" value="<%=rs("addr")%>">
</td>
</tr>
<tr>
<td width="57" height="25" align="center">郵編</td>
<td width="16" height="25"> </td>
<td width="225" height="25"><input name="yb" size="25" maxlength="100" class="editbox1" value="<%=rs("yb")%>">
</td>
</tr>
<tr>
<td height="25" colspan="3">
<div align="center">
<input class=bottom name=B12 type=submit value="修改記錄">
<input class=bottom name=B22 type=reset value="重新填寫">
<input type="hidden" name="id" value="<%=rs("id")%>">
<input type="hidden" name="kind" value="1">
</div></td>
</tr>
</table>
</form>
</td>
</tr>
</table>
<%end if%>
<%if request("kind")="date" then%>
<%
id=trim(Request("id"))
sqlcmd = ("select * from bbs1 where id="&id) '查詢id(ID號)這條記錄
rs.Open sqlcmd,newconn,1,1
%>
<table width="752" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><form method="POST" action="modify.asp">
<table width="300" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td width="57" height="25" align="center">班級</td>
<td width="16" height="25"> </td>
<td width="225" height="25">
<input name="bj" size="25" maxlength="30" class="editbox1" value="<%=rs("bj")%>">
</td>
</tr>
<tr>
<td height="25" align="center">學號</td>
<td width="16" height="25"> </td>
<td width="225" height="25">
<input name="xh" size="25" maxlength="30" class="editbox1" value="<%=rs("xh")%>"></td>
</tr>
<tr>
<td width="57" height="25" align="center">姓名</td>
<td width="16" height="25"> </td>
<td width="225" height="25">
<input name="user" size="25" maxlength="40" class="editbox1" value="<%=rs("user")%>">
</td>
</tr>
<tr>
<td width="57" height="25" align="center">課程</td>
<td width="16" height="25"> </td>
<td width="225" height="25">
<input type="text" name="kc" size="25" class="editbox1" value="<%=rs("kc")%>">
</td>
</tr>
<tr>
<td width="57" height="25" align="center">成績</td>
<td width="16" height="25"> </td>
<td width="225" height="25">
<input name="cj" size="25" maxlength="100" class="editbox1" value="<%=rs("cj")%>">
</td>
</tr>
<tr>
<td width="57" height="25" align="center">學期</td>
<td width="16" height="25"> </td>
<td width="225" height="25">
<select name="xq" class="editbox1">
<option<%if rs("xq")="第一學期" then response.write(" selected")%>>第一學期</option>
<option<%if rs("xq")="第二學期" then response.write(" selected")%>>第二學期</option>
<option<%if rs("xq")="第三學期" then response.write(" selected")%>>第三學期</option>
<option<%if rs("xq")="第四學期" then response.write(" selected")%>>第四學期</option>
<option<%if rs("xq")="第五學期" then response.write(" selected")%>>第五學期</option>
<option<%if rs("xq")="第六學期" then response.write(" selected")%>>第六學期</option>
<option<%if rs("xq")="第七學期" then response.write(" selected")%>>第七學期</option>
<option<%if rs("xq")="第八學期" then response.write(" selected")%>>第八學期</option>
</select>
</td>
</tr>
<tr>
<td width="57" height="25" align="center">類型</td>
<td width="16" height="25"> </td>
<td width="225" height="25">
<select name="lx" type="lx">
<option<%if rs("lx")="必修課" then response.write(" selected")%>>必修課</option>
<option<%if rs("lx")="選修課" then response.write(" selected")%>>選修課</option>
<option<%if rs("lx")="限修課" then response.write(" selected")%>>限修課</option>
</select>
</td>
</tr>
<tr>
<td height="25" colspan="3">
<div align="center">
<input class=bottom name=B12 type=submit value="修改記錄">
<input class=bottom name=B22 type=reset value="重新添寫">
<input type="hidden" name="id" value="<%=rs("id")%>">
<input type="hidden" name="kind" value="2">
</div></td>
</tr>
</table>
</form>
</td>
</tr>
</table>
<%end if%>
<%if request("kind")="bj" then%>
<%
id=trim(Request("id"))
sqlcmd = ("select * from bjb where id="&id) '查詢id(ID號)這條記錄
rs.Open sqlcmd,newconn,1,1
%>
<table width="752" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><form method="POST" action="modify.asp">
<table width="300" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td height="25" align="center"> </td>
<td height="25"> </td>
<td height="25"> </td>
</tr>
<tr>
<td width="57" height="25" align="center">班級</td>
<td width="16" height="25"> </td>
<td width="225" height="25">
<input name="bj" size="25" maxlength="30" class="editbox1" value="<%=rs("bj")%>">
</td>
</tr>
<tr>
<td height="25" align="center">學號代碼</td>
<td width="16" height="25"> </td>
<td width="225" height="25">
<input name="xhf" type="text" size="25" maxlength="30" class="editbox1" value="<%=rs("xhf")%>"></td>
</tr>
<tr>
<td height="25" colspan="3">
<div align="center">
<input class=bottom name=B12 type=submit value="修改記錄">
<input class=bottom name=B22 type=reset value="重新填寫">
<input type="hidden" name="kind" value="3">
<input type="hidden" name="id" value="<%=rs("id")%>">
</div></td>
</tr>
</table>
</form>
</td>
</tr>
</table>
<%end if%>
<!--#include file="copyright.asp"-->
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -