|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
asp对于服务器的要求较高,一般的服务器如果访问量一大就垮了,不得不重启。core|收集<%@Language=VBScript%>
<HTML>
<HEAD>
<METANAME="GENERATOR"Content="MicrosoftVisualStudio6.0">
</HEAD>
<BODY>
<Palign=center><STRONG><FONTcolor=crimsonface=""size=4>
<%=Request.QueryString("sub")%>课的测验成就
</FONT></STRONG></P>
<Palign=center><FONTcolor=dodgerblueface=""size=2>
任课教员:<%=Request("teachname")%>
</FONT></P>
<Palign=center>
<TABLEborder=0cellPadding=1cellSpacing=1width=75%>
<TRbgcolor=Peachpuff>
<TD>姓名</TD>
<TD>成就</TD>
<TD>名次</TD></TR>
<%
setconn=server.CreateObject("adodb.connection")
conn.ConnectionString="dsn=testsys"
conn.Open
声明sql查询语句,从数据库中查询响应科目标测验成就,查询布局按降序体例排序
strsql="SELECTscore.score,studentinfo.stnameFROMscore,studentinfowherescore.stid=studentinfo.stidandteachid="&Request.QueryString("teachid")&"andscore.sub="&Request.QueryString("sub")&"ORDERBYscore.scoreDESC"
setmrs=conn.Execute(strsql)
i=1
whilenotmrs.eof
以表格的情势显现响应测验科目标成就和先生姓名
Response.Write"<TR>"
Response.Write"<TD>"
Response.Writemrs("stname")
Response.Write"</TD>"
Response.Write"<TD>"
Response.Writemrs("score")
Response.Write"</TD>"
Response.Write"<TD>"&i&"</TD></TR>"
i=i+1
mrs.movenext
wend
conn.Close
setconn=nothing
%>
<TRbgcolor=Peachpuff><TD></TD><TD></TD><TD></TD></TR>
</TABLE>
</P>
</BODY>
</HTML>
</p>ASP脚本是采用明文(plaintext)方式来编写的。 |
|