?? do_modify.asp
字號:
<HTML> <BODY>
<%
str = Request("xuehao")
set conn = Server.CreateObject("ADODB.Connection")
conn.Open("driver={Microsoft Access Driver (*.mdb)};dbq=" &_
Server.MapPath("person.mdb"))
set cmd = Server.CreateObject("ADODB.Command")
cmd.ActiveConnection = conn
sql = "SELECT * FROM grade WHERE 學號 = " & str
cmd.CommandText = sql
set rs = cmd.Execute()
%>
<%=rs("姓名")%>的成績為:<br>
<FORM ACTION="do_mdysmt.asp" METHOD="post">
<%
'輸出表內容
If not rs.EOF Then
%>
<INPUT TYPE="HIDDEN" NAME="xuehao" VALUE="<%=rs("學號")%>"><BR>
語文:<INPUT TYPE="TEXT" NAME="yuwen" value="<%=rs("語文")%>"><BR>
數學:<INPUT TYPE="TEXT" NAME="shuxue" value="<%=rs("數學")%>"><BR>
英語:<INPUT TYPE="TEXT" NAME="yingyu" value="<%=rs("英語")%>"><BR>
<INPUT TYPE="SUBMIT" VALUE="修改">
<%
End If
%>
</FORM> </BODY>
</HTML>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -