📄 stuentinto.asp
字号:
<%@ Language=VBScript %>
<HTML>
<HEAD>
<script id="clientEventHandlersJS" language="javascript">
<!--
function Button2_onclick() //点击取消按钮
{
document.form1.Text1.value=""; //清空Text1的内容
document.form1.Text1.focus(); //将焦点琐定到Text1
document.form1.Text2.value=""; //清空Text2的内容
}
function Submit1_onclick()
{
if (document.form1.Text1.value ==""|| document.form1.Text2.value=="")//判断姓名和学号
{ //两个文本框传来的值
window.alert("请认真填写你的学号和姓名，谢谢！"); //是否为空 如果一种一个值为空系统都会弹出”请认真填写你的名字，谢谢“
document.form1.Text1.value=""; //清空Text1的内容
document.form1.Text1.focus(); //将焦点琐定到Text1
document.form1.Text2.value=""; //清空Text2的内容
return false;
}
}
-->
</script>
<meta name="GENERATOR" Content="Microsoft Visual Studio.NET 7.0">
</HEAD>
<body>
<%
session("id")=request.Form("text1") '得到学生学号
session("name")=request.Form("text2") '得到学生姓名
if session("id")<>"" and session("name")<>"" then '
if ((left(session("id"),2)<>"s1") and (left(session("id"),2)<>"s2") and (left(session("id"),2)<>"s3" )) then
'以上是保证学号是以S1或S2或S3为开头 如果不是 将弹出”你的学号有误“
%>
<script language="javascript">
window.alert("你的学号有误！");
window.open("stuentinto.asp","_parent") //弹出对话框口 页面转向登陆界面
</script>
<%
else
set cn=server.CreateObject("adodb.connection") '定义连接对象cn
'cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\data\s223bsh03.mdb;Persist Security Info=False" '连接数据库
'cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
' "Data Source=/data/s223bsh03.mdb"
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.MapPath("data/s223bsh03.mdb") & ";Persist Security Info=False"
set rs=server.CreateObject("adodb.recordset") '定义记录集
rs.Open "select * from studentsenter where 学号='"& session("id") &"'",cn,3,1 '打开记录集
if rs.EOF then
rs.Close '关闭记录集
cn.Execute("insert into studentsenter values('"& session("id") &"','"& session("name") &"')") '如果数据库中没有用户添入的数据 将把用户的用户名和学号 保存在数据库中
response.Redirect ("exam_interface.asp") '转向 考试与查询成绩的选择界面
else
if session("name")<>rs.Fields("姓名") then '判断用户添入的姓名与数据库中数据是否相同
%>
<script language="javascript">
<!--
window.alert("数据有误请重新输入！"); //如果不同弹出对话框”你的学号也也姓名一不致“
document.form1.Text1.value=""; //清空Text1的内容
document.form1.Text1.focus(); //将焦点锁定在ext1
document.form1.Text2.value=""; //清空Text2的内容
-->
</script>
<%
else
response.Redirect ("exam_interface.asp") '转到选择考试科目与选择成绩界面
end if
end if
end if
end if
%>
<form name="form1" action="stuentinto.asp" method="post" onsubmit="Button1"> <!-- 表单提交到本页 -->
<DIV align="right"><FONT face="宋体"></FONT></DIV>
<DIV align="right"><FONT face="宋体"><IMG alt="" src="pic\logo.jpg"></FONT></DIV>
<DIV align="center">
<TABLE id="Table1" cellSpacing="1" cellPadding="1" width="458" border="0" height="35">
<TR>
<TD><FONT face="宋体"><marquee id="MARQUEE1"><font size="6" color="red">欢迎你来到学生考试系统，祝你考试成功！</font></marquee></FONT></TD>
</TR>
</TABLE>
</DIV>
<DIV align="center"><FONT face="宋体"></FONT> </DIV>
<DIV align="center"><FONT face="宋体"></FONT> </DIV>
<DIV align="center"><FONT face="宋体"></FONT> </DIV>
<DIV align="center"><FONT face="宋体"></FONT> </DIV>
<DIV align="center">
<TABLE id="Table2" cellSpacing="1" cellPadding="1" width="300" border="0">
<TR>
<TD width="131">学号：</TD>
<TD>
<INPUT id="Text1" type="text" size="26" name="text1" >
</TD>
</TR>
<TR>
<TD width="131">姓名：</TD>
<TD>
<INPUT id="Text2" type="text" size="26" name="text2">
</TD>
</TR>
</TABLE>
</DIV>
<P><FONT face="宋体"></FONT> </P>
<P align="center">
<TABLE id="Table3" cellSpacing="1" cellPadding="1" width="111" border="0" height="28">
<TR>
<TD width="53">
<P align="center">
<INPUT id="Submit1" type="submit" value="登录" name="Submit1" onclick="return Submit1_onclick()">
</P>
</TD>
<TD>
<P align="center">
<INPUT id="Button2" type="button" value="取消" name="Button2" onclick="return Button2_onclick()">
</P>
</TD>
</TR>
</TABLE>
</P>
</form>
</body>
</HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -