📄 list1.asp
字号:
<html>
<head>
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>新建网页 1</title>
<% response.buffer=true
dim username,password,studentclassid
password=request.form("password")
username=request.form("username")%>
<!--#include file="conn1.asp"-->
<%set ors=server.createobject("adodb.recordset")
ors.open "select *from student where stuid='"&username&"' and type='2' ",conn
if ors.eof or ors.bof then
response.redirect "check1.asp"
elseif password<>ors("pass1") then
response.redirect "check2.asp"
end if
studentclassid=ors("classid")
%>
</head>
<body bgcolor="#E2F5E2">
<% set orc=server.createobject("adodb.recordset")
strsql="select * from class where classid = '"&studentclassid&" '"
orc.open strsql ,conn
%>
<table border="0" width="556" bordercolorlight="#f2f4ff" cellpadding="0" bordercolorlight="#f1f4ff" style="font-size:x-small" height="105" >
<tr> <td valign="middle" align=left height="103"><FONT COLOR=#000000>
>> 欢迎您：<img border="0" src="IMAGES/Male.gif" >
<a href="default1.asp"><FONT COLOR=#000000>返回登录界面：</FONT></a> |
<a href="pass.asp?stuid=<%=username%>"><FONT COLOR=#000000>更改密码</FONT></a>|
<a href=""><FONT COLOR=#000000>短消息</FONT></a> |
<a href="help.htm"><FONT COLOR=#000000>评教系统使用说明</FONT></a> |
<a href="index.htm"><FONT COLOR=#000000>退出</FONT></a> | </a> </FONT>
</td></tr>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="911" id="AutoNumber1" height="44">
<tr>
<td align="left" height="19" width="144"><font color="#80000">学号：</font>
<font color="#336600"><%=ors("stuid")%></font>
<td align="left" height="19" width="151"><font color="#80000">姓名：</font>
<font color="#336600"><%=ors("name")%></font>
<td align="left" height="19" width="216"><font color="#80000">年级：</font>
<font color="#336600"><%=orc("grade")%>级</font>
<td align="left" height="19" width="298"><font color="#80000">学院（系）：</font>
<font color="#336600"><%=orc("department")%>系</font>
</table>
<table border="1" align="center" width="80%" >
<tr>
<td width="7%" height="1"><font color="#80000">代码</font></td>
<td width="20%" height="1"><font color="#80000">课程名称</font></td>
<td width="20%" height="1"><font color="#80000">任课老师</font></td>
<td width="19%" height="1"><font color="#80000">已投票人数</font></td>
<td width="19%" height="1"><font color="#80000">投票</font></td >
</tr>
<%set orv=server.createobject("adodb.recordset")
strsql="select * from vote where classid = '"&studentclassid&" '"
orv.open strsql ,conn
do while not orv.eof
i=i+1%>
<tr>
<td width="7%" height="1"><font color="#338800"><%=i%></font></td>
<td width="20%" height="1"><font color="#338800"><%=orv("coursename")%></font></td>
<td width="20%" height="1"><font color="#338800"><%=orv("teachername")%></font></td>
<td width="19%" height="1"><font color="#338800"><%=orv("votenum")%></font></td>
<td width="19%" height="1"><font color="#338800">
<%response.write "<a href=list.asp?teachername="&orv("teachername")&"&coursename="&orv("coursename")&"&username="&ors("stuid")&"&sequence="&i&">"&"进入"&"</a>"%>
</tr>
<%orv.movenext
loop %>
</table>
</table>
</body>
</html>
<%ors.close
set ors=nothing
orv.close
set orv=nothing
orc.close
set orc=nothing
conn.close
set conn=nothing
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -