首先在你网站根目录下新建一个名为:Global.asa的文件,然后把下列代码贴上去:
<script language="vbscript" runat="server">
Sub Application_OnStart
application("yes")=0
application("no")=0
End Sub
</script>
然后再建一个投票的ASP文件,内容:
<style type="text/css">
<!--
.Vote {
height: 15px
width: 200px
border: 1px solid #0033FF
}
#cYes {
background-color: #FF6600
height: 15px
width: 100px
}
#cNo {
background-color: #FF6600
height: 15px
width: 100px
}
-->
</style>
<form action="" method="post">
<br />
<input name="yes" type="radio" value="yes" onclick="if (this.checked==true) no.checked=false" />赞成<br />
<input name="no" type="radio" value="no" onclick="if (this.checked==true) yes.checked=false"/>反对<br />
<input name="投票" type="submit" value="投票" />
</form>
<%
nyes=0
nNo=0
'如果想重新计票，用下面四行
'application.lock()
'application("yes")=application("yes")+1
'application("no")=application("no")+1
'application.unlock()
count=application("yes")+application("no")
if count<>0 then
nyes=int(application("yes")*200/count)
nNo=int(application("no")*200/count)
end if
sYes=Request.form("yes")
sNo=Request.form("no")
act= Request.form("投票")
if act="投票" Then
if sYes="yes" Then
application.lock()
application("yes")=application("yes")+1
application.unlock()
Else
if sNo="no" then
application.lock()
application("no")=application("no")+1
application.unlock()
end if
End if
'图形化显示投票结果
count=application("yes")+application("no")
if count<>0 then
nyes=int(application("yes")*200/count)
nNo=int(application("no")*200/count)
end if
end if
%>
赞成：<%=application("yes")%>票
<div class="Vote" ><div ID="cYes" neme="cYes" style="width:<%=nyes%>px"></div></div>
反对：：<%=application("no")%>票
<div class="Vote" ><div ID="cNo" neme="cNo" style="width:<%=nNo%>px"></div></div>
金山表单是一个在线表单制作和调查工具，支持匿名投票功能。想实现监票功能，可以使用以下方法之一：1、使用多个浏览器或设备登录多个不同的账号，用这些账号对同一个表单进行投票，就可以模拟多个人同时投票的情况。
2、在投票页面上使用浏览器的开发者工具，手动修改表单的HTML代码，去掉匿名投票的限制，这样就可以监票每个人的投票情况。
3、在创建表单时，选择不使用匿名投票功能，要求填写个人信息，就可以监票每个人的投票情况。
