📄 cj_edit_ok.asp
字号:
<!--#include file="chkadmin.asp"-->
<!--#include file="conn.asp"-->
<%
classid=Request("classid")
jecid=Request("jecid")
stuid=Trim(Request("stuid"))
subid=Request("subid")
%>
<form method="post" action="cj_edit_ok2.asp">
<%
yn=0
Response.Write "正在查询符合条件的记录...<br><br>"
set fs=server.createobject("adodb.recordset")
fs.open "select * from [chengji]",conn,1,1
If fs.RecordCount=0 Then
Response.Write "数据库中没有记录!"
Else
Do while not fs.eof
if fs("stuid")=Cint(stuid) and fs("subid")=Cint(subid) and fs("jecid")=Cint(jecid) Then
Response.Write "找到了符合输入条件的记录,该记录成绩分数为:"
Response.Write "<input type=text name=cj size=3 value="&fs("cj")&">" & " <input type=hidden name=id value=" & fs("id")&"><input type=submit value=修改 name=B1>"
yn=1
End If
fs.MoveNext
Loop
If yn<>1 Then
Response.Write "没有找到符合条件的记录,请确认您输入信息的有效性!"
End If
End If
fs.Close
Set fs=nothing
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -