📄 chklogin.asp
字号:
<%@ Language=VBScript %>
<!--#include file="data.asp"-->
<%
set rs=server.CreateObject ("adodb.recordset")
'将rs的参数设定为由Server执行CreateObject的操作,并且产生ADODB中的Recordset对象
rs.Open"select * from student where 学号="+"'"+request.form("classno")+"'",conn,1
'将rs的参数设定为执行SQL的查询语法,将'含有"default.asp"中输入的学号的记录作为查询对象
recordcount=rs.RecordCount
'对查询对象进行计数
if recordcount<>0 then
'如果查询对象计数大于0则显示该记录的如下信息
session("姓名")=rs("姓名")
session("学号")=rs("学号")
session("班级")=rs("班级")
%>
<title>个人信息</title>
<div align="center">
<p> </p>
<form name="form1" method="post" action="test.asp">
<div align="center"><font size="5"><b>请检查下面关于你的信息对吗?</b></font><br>
<br>
</div>
<table border="1" cellspacing="2" align="center" width="28%">
<tr>
<td width="32%" nowrap><b><font size="4">学 号:</font></b></td>
<td width="68%" nowrap><b><font size="4"><%=session("学号")%>
</font></b></td>
</tr>
<tr>
<td width="32%" nowrap><b><font size="4">姓 名:</font></b></td>
<td width="68%" nowrap><b><font size="4"><%=session("姓名")%></font></b></td>
</tr>
<tr>
<td width="32%" nowrap><b><font size="4">班 级:</font></b></td>
<td width="68%" nowrap><b><font size="4"><%=session("班级")%></font></b></td>
</tr>
</table>
<br>
<input type="submit" name="Submit" value="进 入 考 试" >
</form>
</div>
<%
else
'如果没有查到该学号,则提示
response.write "学号输入有误!"+"<br>"
end if
%>
<div align="center"><br>
<a href="default.asp">返回登录页面</a></div>
<%
rs.Close
'关闭rs对象
conn.close
'关闭conn对象
set rs=nothing
'断开与查询对象的链接
set conn=nothing
'断开与数据库的链接
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -