📄 votes.asp
字号:
<!--#include file="db_conn.asp"-->
<!--#include file="my_lib/my_request.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>投票结果</title>
</head>
<body>
<table border="1" width="100%" cellspacing="1" style="padding:0px; border:1px solid #F7941D; border-collapse: collapse; " bordercolor="#ACA793">
<tr>
<td>
<table border="0" width="100%" cellspacing="0" cellpadding="0">
<tr>
<td style="border-top: 3px solid #FBAF5D" bgcolor="#FF9900">
<p align="center"><b>
<font color="#FFFFFF" style="font-size: 14px">投票结果</font></b></td>
</tr>
<%
vflag=my_request("vflag",0)
if vflag="add" then
idnums=my_request("idnums",1)
if Request.ServerVariables("REMOTE_ADDR")=request.cookies("IPAddress") then
response.write"<SCRIPT language=JavaScript>alert('感谢您的支持，您已经投过票了，请勿重复投票，谢谢！');"
response.write"javascript:window.close();</SCRIPT>"
end if
if idnums="" or isnull(idnums) then
response.write"<SCRIPT language=JavaScript>alert('对不起，请选择投票类别！');"
response.write"javascript:window.close();</SCRIPT>"
else
sql="update vote set nums=nums+1 where id="&idnums
conn.execute (sql)
response.cookies("IPAddress")=Request.ServerVariables("REMOTE_ADDR")
end if
%>
<tr>
<td><span style="font-size: 9pt">感谢您的参与</span></td>
</tr>
<%
end if
Set rs= Server.CreateObject("ADODB.Recordset")
sql2="select * from vote where flag=0"
rs.open sql2,conn,1,1
'求出数
Amount=0
if rs.eof then
Amount=0
else
For I = 1 To rs.RecordCount
Amount = Amount + rs("nums")
rs.MoveNext
Next
'将数据移到第一条
rs.MoveFirst
%>
<tr>
<td><span style="font-size: 9pt">到目前为止结果如下(一共投票数<%=Amount%>)</span></td>
</tr>
<tr>
<td><hr color="#ACA793" size="1"></td>
</tr>
<%
do while not rs.eof
Percent = Round((rs("nums")/Amount)*100,2)
%>
<tr>
<td><span style="font-size: 9pt"><%=rs("vote")%>:<img src="images/poll.gif" width="<%= Percent * 3 %>" height="10"> <%=Percent%>% 得票数:<%=rs("nums")%></span></td>
</tr>
<%rs.movenext
loop
rs.close
set rs=nothing
conn.close
set conn=nothing%>
</table>
</td>
</tr>
</table>
<%end if%>
<table border="0" width="100%" cellpadding="2">
<tr>
<td align=center class=style1><a href="javascript:self.close();">
<font color="#000000" style="font-size: 14px">关闭窗口</font></a></td>
</tr>
</table>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -