📄 showvote.asp

📁 情缘天空美化版 v3.68 强大的公告
💻 ASP
字号:
<!--#include file="config.asp"-->
<!--#include file="conn.asp"-->
<!--#include file="format.asp"-->

<%
dim itemid,founderr,errmsg,itemname
founderr=false
errmsg=""

if request.querystring("vt_id")="" then
founderr=true
errmsg=errmsg+"<br>"+"<li>你必须指定投票的主题！"
else
if not isInteger(request.querystring("vt_id")) then
founderr=true
errmsg=errmsg+"<br>"+"<li>非法的投票主题的id参数。"
else
vtid=cint(request.querystring("vt_id"))
end if
end if

if founderr then
call diserror()
response.end
else
%>
<link rel="stylesheet" href="Sams.css" type="text/css">
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" bgcolor=#ffffff>
<table width="208" border="0" cellspacing="0" cellpadding="0" align="center" bgcolor=#ffffff>
<tr>
<td height="40" align="right" background="images/lefttablo_01f.gif"><br>
:::<strong>投票结果</strong>:::&nbsp;&nbsp;&nbsp;</td>
</tr>
</table>
<table width="208" border="0" align="center" cellpadding="0" cellspacing="0" background="images/lefttablo_03.gif">
<tr>
<td height="6" background="images/lefttablo_03.gif></td>
</tr>
<tr>
<td height="108" align="center"><table width="90%" border="0" cellpadding="0" cellspacing="2" bgcolor=#ffffff>
<%
openadmin
sql="select vt_name from votetopic where vt_id="&vtid
set rs=conn.execute(sql)
%>
<tr>
<td colspan="2"><%=rs("vt_name")%></td>
</tr>
<%sql="select * from voteitem where vt_id="&vtid
set rs2=server.createobject("adodb.recordset")
rs2.open sql,conn,1,1
totalvote=0
rs2.movefirst
do while not rs2.eof
totalvote=totalvote+rs2("item_count")
rs2.movenext
loop
rs2.movefirst
do while not rs2.eof
%>
<tr>
<td width="85" align="center"><%=rs2("item_name")%></td>
<td width="96"><img src="images/votebar.gif" width="<%= FormatNumber((rs2("item_count")/totalvote*87),4) %>" height="12" title="<%=rs2("item_count")%>票"> <font color=#cccccc><%=rs2("item_count")%></font></td>
</tr>
<%rs2.movenext
loop
if rs2.eof and rs2.bof then%>
<tr>
<td colspan="2" align="center">当前没有投票选项！</td>
</tr>
<%end if
rs2.close
set rs2=nothing%>
<tr>
<td height="30" colspan="2" align="center">
<%if request.cookies("npw")("voted")<>"yes" then%>
您尚未投票！
<%else%>
您已经投过票了
<%end if%>
&nbsp;总计票数<span class="newshead"><%=totalvote%></span>票 </td>
</tr>
<tr>
<td colspan="2" align="center">[<a href="javascript:window.close()">关闭窗口</a>]</td>
</tr>
</table></td>
</tr>
<tr>
<td valign="bottom"><img src="images/lefttablo_05.gif"></td>
</tr>
</table>
</center>
</div>
</body>
<%
end if
%>
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -