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

📄 show.asp

📁 全新后台新闻编辑器 2.全新后台下载编辑器 3.增加图片友情链接管理功能 4.JMail在线发送邮件,支持在线导出Email 5.新增在后台网站配置中指定网站首页新闻条数 6.后台
💻 ASP
字号:
<!--#include file="conn.inc"-->
<%set rsTp=server.CreateObject("adodb.recordset")
  sqlTp="select * from title where id="&request("id")
  rsTp.open sqlTp,connstr%>
  <%set rs=server.CreateObject("adodb.recordset")
    sql="select * from choice where extends="&request("id")&" order by id desc"
	rs.open sql,connstr%>
	  <%set rsTotle=server.CreateObject("adodb.recordset")
    sqlTotle="select SUM(num) from choice where extends="&request("id")
	rsTotle.open sqlTotle,connstr
	if rsTotle(0)=0 then
	   response.write "目前还没有投票数!"
	else%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>投票结果</title>
<style type="text/css">
<!--
body,td,th {
	font-family: 宋体;
	font-size: 12px;
}
body {
	background-color: #3A4B55;
}
.style1 {color: #FFFFFF}
.style3 {color: #FFFF00}
.style4 {color: #CC0000}
a:link {
	color: #FFFFFF;
	text-decoration: none;
}
a:visited {
	text-decoration: none;
	color: #FFFFFF;
}
a:hover {
	text-decoration: underline;
	color: #FFFFFF;
}
a:active {
	text-decoration: none;
	color: #FFFFFF;
}
a {
	font-size: 12px;
}
-->
</style></head>

<body>
<table width="100%"  border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td>&nbsp;</td>
  </tr>
</table>
<table width="80%" height="191"  border="0" align="center" cellpadding="2" cellspacing="1" bgcolor="#000000">
  <tr>
    <td width="100%" height="189" valign="top" bgcolor="#E0E1E3"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td height="45" valign="bottom" bgcolor="#1685C7"><div align="center"><span class="style1">关于“</span><span class="style3"><%=rsTp("title")%></span>
              <span class="style1">”的主题投票结果如下:</span>
              <hr width="90%" size="1" color="#FFFFFF">
        </div></td>
      </tr>
    </table>
      <table width="90%"  border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td height="25">&nbsp;</td>
        </tr>
      </table>
      <table width="90%"  border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td height="179">
		  <%do while not rs.eof%>
          <table width="100%"  border="0" cellspacing="4" cellpadding="0">
            <tr>
              <td width="19%"><%=rs("choice")%></td>
              <td width="61%"><img src="dot1.gif" width="<%=int(100*rs("num")/rsTotle(0))%>%" height="15"></td>
              <td width="9%"><div align="right"><span class="style4"><%=int(100*rs("num")/rsTotle(0))%></span>%</div></td>
              <td width="11%"><div align="right"><span class="style4"><%=rs("num")%></span>人</div></td>
            </tr>
          </table>
		  <%rs.movenext
		    loop
			rs.close
			set rs=nothing%>
</td>
        </tr>
      </table>
      <table width="90%"  border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td height="46"><div align="right">共有<span class="style4"><%=rsTotle(0)%></span>张票数</div></td>
        </tr>
      </table>
      <table width="90%"  border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td height="25">&nbsp;</td>
        </tr>
    </table></td>
  </tr>
</table>
<p align="center"><a href="#" onClick="javascript:window.close()">关闭窗口</a> &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<a href="../index.asp">返回首页</a></p>
</body>
</html>
<%rsTotle.close
  set rsTotle=nothing%>
  <%end if%>

⌨️ 快捷键说明

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