⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 showvote.asp

📁 ASP源码
💻 ASP
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#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="site_css.css" type="text/css">

<body bgcolor="#293863">
<p> </p>
<div align="center">
  <center>
<table width="85%" border="0" cellpadding="10" cellspacing="1" bgcolor="#000000" class="chinese">
  <tr> 
    <td colspan="2" bgcolor="#E8E8E8" align="center" class="chinese" width="706"><img src="images/img.gif" width="18" height="13"> 
      投票结果</td>
  </tr>
<%
openadmin
sql="select vt_name from votetopic where vt_id="&vtid
set rs=conn.execute(sql)
%>
  <tr> 
    <td colspan="2" align="center" bgcolor="#FFFFFF" width="706"><%=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 bgcolor="#FFFFFF"> 
    <td width="123" align="center"><%=rs2("item_name")%></td>
    <td width="562"><img src="images/votebar.gif" width="<%= FormatNumber((rs2("item_count")/totalvote*500),4) %>" height="14" title="<%=rs2("item_count")%>票"></td>
  </tr>
  <%rs2.movenext
loop
if rs2.eof and rs2.bof then%>
  <tr> 
    <td colspan="2" align="center" bgcolor="#FFFFFF" width="706">当前没有投票选项!</td>
  </tr>
  <%end if
rs2.close
set rs2=nothing%>
  <tr> 
    <td height="30" colspan="2" align="center" bgcolor="#FFFFFF" class="chinese" width="706"><%if request.cookies("npw")("voted")<>"yes" then%>您尚未投票!<%else%>您已经投过票了<%end if%>。总计票数<span class="newshead"><%=totalvote%></span>票
    </td>
  </tr>
  <tr>
    <td colspan="2" bgcolor="#FFFFFF" class="chinese" align="center" width="706">[<a href="javascript:window.close()">关闭窗口</a>]</td>
  </tr>
</table>
  </center>
</div>
</body>
<%
end if
%>

⌨️ 快捷键说明

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