📄 showvote.asp
字号:
<!--#include file="const.asp"-->
<!--#include file="conn.asp"-->
<%
classid=Clng(request("classid"))
set rs=server.createobject("adodb.recordset")
set rs=conn.execute("select title from class where id="&classid)
title=rs("title")
rs.close
sql="select * from vote where class="&classid
rs.open sql,conn,3,1
totalcount=0
do while not rs.eof
totalcount=totalcount+rs("count")
rs.movenext
loop
totalren=totalcount
if totalcount=0 then
totalcount=1
end if
%><head>
<title></title>
<link rel="stylesheet" type="text/css" href="STYLE.CSS">
</head>
<div align="center">
<center>
<table border="0" width="600" bordercolorlight="#000000" cellspacing="0" cellpadding="0" bordercolordark="#FFFFFF" height="73">
<tr>
<td width="596" colspan="3" height="23" bgcolor="#E7E7E7">
<p align="center"><b><font size=3 color=#0066cc>～<%=title%>～</font></b></td>
</tr>
<%rs.movefirst
do while not rs.eof%>
<tr>
<td height="23" width="164" bgcolor="#E7E7E7">
<p align="center"><%=rs("vote")%></td>
<%h=(rs("count")*300)/totalcount%>
<td height="23" width="300" valign="middle" bgcolor="#E7E7E7">
<table border="0" width="<%=h%>" height="13" bgcolor="<%=rs("color")%>" cellspacing="0" cellpadding="0" bordercolorlight="#000000" bordercolordark="#FFFFFF">
<tr>
<td width="100%" style="border-style: solid; border-width: 1" valign="middle"></td>
</tr>
</table>
</td>
<td height="23" width="129" bgcolor="#E7E7E7">
<p align="center"><font color=green><%=rs("count")%></font> 票(<%=cint((rs("count")*10000)/totalcount)/100%>%)</td>
</tr>
<%rs.movenext
loop%>
<tr>
<td width="596" colspan="3" height="21" bgcolor="#E7E7E7">
<p align="center">共有投票<b><font color=red><%=totalren%></font></b>人次</td>
</tr>
</table>
</center>
</div>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -